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-REM & 


IDENTIFICATION 


PRODUCT CODE: AC-F630A-MC 

PRODUCT NAME: CKFPAAO FP1IF FLTG PNT PRT A 
DATE CREATED: OCTOBER, 1979 

MAINTAINER: DIAGNOSTIC ENGINEERING 
AUTHOR : ANTHONY VEZZA 


% 


THE INFORMATION IN THIS DOCUMENT IS SUBJECT TO _ CHANGE 
WITHOUT NOTICE AND SHOULD NOT BE CONSTRUED AS A COMMITMENT 
BY DIGITAL EQUIPMENT CORPORATION. DIGITAL EQUIPMENT 
CORPORATION ASSUMES NO RESPONSIBILITY FOR ANY ERRORS THAT 
MAY OCCUR IN THIS MANUAL. 


THE SOFTWARE DESCRIBED IN THIS DOCUMENT IS FURNISHED TO_ THE 
PURCHASER UNDER A LICENSE FOR USE ON A SINGLE COMPUTER 
SYSTEM AND CAN BE COPIED (WITH INCLUSION OF DIGITAL'S 
COPYRIGHT NOTICE) ONLY FOR USE IN SUCH SYSTEM, EXCEPT AS MAY 
OTHERWISE BE PROVIDED IN WRITING BY DIGITAL. 


DIGITAL EQUIPMENT CORPORATION ASSUMES NO RESPONSIBILITY FOR 
THE USE OR RELIABILITY OF ITS SOFTWARE ON EQUIPMENT THAT IS 
NOT SUPPLIED BY DIGITAL. 


COPYRIGHT (C) 1979 BY DIGITAL EQUIPMENT CORPORATION 
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HISTORY 
NO CHANGES TO THE 11/34 FLOATING POINT DIAGNOSTIC — "A' WERE 
POUND TO BE NEEDED TO ADAPT IT FOR USE ON THE 11/44 


THE FOLLOWING WAS ADDED TO THE 11/34 FLOATING POINT DIAGNOSTIC 
TO MAKE THE ‘B* VERSION COVER THE 11/44: 


1. TEST 22 = PROCESSOR LOOKS TO SEE IF APT IS CON- 
TROLLING THE TEST, AND IF IT IS, CHECKS TO SEE 
IF THE USER HAS SELECTED THIS TEST BY CHECKING 
BIT 7 IN THE SWITCH REGISTER. IT HAS ALSO BEEN 
CHANGED SO THAT IF BIT 7 IS *ONE*, THE CODE WILL 
SELECT THE TEST. 


THE FOLLOWING WAS ADDED TO THE 11/34 FLOATING POINT DIAGNOSTIC 
TO MAKE THE ‘C* VERSION COVER THE 11/44: 


1. TEST 76 = CHECKS THAT FP PROCESSOR DOESN'T ACCESS 
D-SPACE UNTIL CONDITIONS WARRANT. 


2. TEST 77 = CHECKS THAT SR1 MATCHES WHAT ACTUALLY 
HAPPENED TO THE REGISTER OF THE INSTRUCTION, AND 
sans Mes VALUE OF AUTO INCREMENT/DECREMENT WAS 
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ABSTRACT 


THE THREE PROGRAMS: 
CKFPAAQ CKFPBAO CKFPCAO 


ARE DESIGN " DETECT AND REPORT LOGIC onorkes IN THE 
PDP 11/44 FP11-F FLOATING POINT PROCESSOR. THE 
DESIGN IS AN ATTEMPT TO REACH ALL ROM STATES, TAKE 
ALL BRANCH MICRO TESTS (BUT'S) AND VERIFY ALL THE 
LOGIC. THEY CONSIST OF 157 (OCT) INDIVIDUAL TESTS 
SEQUENCED TO DETECT AND ATTEMPT TO IDENTIFY FAULTS 
WITH A MINIMUM HARDWARE OR SOFTWARE LEVEL. _ THE 
TESTS ARE PARTIONED INTO THREE STAND-ALONE PROGRAMS 
DESCRIBED BELOW. 


NOTE THAT ERROR REPORTS IN THESE PROGRAMS ARE BASED 
UPON THE KNOWLEDGE THAT ALL PREVIOUS TESTS HAVE BEEN 
RUN AND IN MOST CASE THAT THERE IS ONLY A_ SINGLE 
POINT FAULT IN THE FP11-F. IF THE PROGRAMS OR TESTS 
hae IN ORDER THEN ERROR MESSAGES MAY NOT BE 
AC . 


A. CKF PAAO 

CKFPAAO TESTS: 
LDFPS 
STFPS 
CFCC 


eee” SETD, SETI AND SETL 

LDF AND LDD (ALL SOURCE MODES) 

STD (MODE 0 AND 1) 

ADDF, ADDD AND SUBD (MOST CONDITIONS) 
B. CKF PBAO 
CKFPBAO TESTS: 


ADDF, ADDD AND SUBD (ALL CONDITIONS NOT 
TESTED IN CKFPAAQ) 
CMPD AND CMPF 


DIVD AND DIVF 
MULD AND MULF 
MODD AND MODF 
C. CKFPCAQ 
CKFPCAQ TESTS: 
STF AND STD (ALL MODES) 
STCDF 


STCFD AND 
CLRD AND CLRF 
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NEGF AND NEGD 


NEGF, ABSF AND TSTF (ALL SOURCE MODES) 
NEGF, ABSF AND TSTF (ALL SOURCE MODES) 
LDFPS (ALL SOURCE MODES) 

LDCIF AND LDCLF 

LDCID AND LDCLD 


LDEXP 

STFPS (ALL ne MODE S) 
STCFL AND STCFI 

STCDL AND STCDI 

STEXP 

STST 

REQUIREMENTS 
EQUIPMENT 


A PDP 11/44 (WITH OR WITHOUT CONSOLE), LA30 (OR 
EQUIVALENT) AND AN FP11-F FLOATING POINT PROCESSOR. 
NOTE THAT A SPECIAL ging 4% TEST MODULE IS_ BEING 
DESIGNED FOR USE IN THE MANUFACTURING ENVIRONMENT. 
WHEN THIS DEVICE IS PRESENT THE PROGRAM CKFPBAO WILL 
MAKE USE OF IT TO TEST THE FPP INTERRUPT ON BUS 
REQUEST FUNCTIONS. 


STORAGE 


ALL THREE PROGRAM pag A MEMORY SYSTEM OF AT 
LEAST 16K TO LOAD AND RUN. 


PRELIMINARY PROGRAMS 


THESE THREE DIAGNOSTICS WILL ASSUME THAT THE PDP 
11/44 CENTRAL PROCESSOR IS FAULTLESS, THEREFORE WHEN 
IN DOUBT RUN THE PDP 11/44 PROCESSOR DIAGNOSTICS 
BEFORE THESE FP11-F DIAGNOSTICS 


LOADING PROCEDURE 


THE PROGRAMS WILL BE SUPPLIED ON THE 11/44 
DIAGNOSTIC MEDIA. REFER TO THE XXDP OPERATING 
MANUAL FOR FURTHER INFORMATION. 


STARTING PROCEDURE 


CONTROL SWITCH SETTINGS 
SEE SECTION 5.1 
PROGRAM AND OPERATOR ACTION 
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1. LOAD PROGRAM INTO MEMORY 

ee LOAD ADDRESS 200 

: SET CONSOLE SWITCHES (IF CONSOLE IS PRESENT) 

4. PRESS START 
ON FIRST PASS THE PROGRAM 
WILL IDENTIFY ITSELF. NOTE THAT IF THERE IS 
NO PHYSICAL CONSOLE THE PROGRAM WILL REQUEST 
THE OPERATOR FOR INITIAL VALUE FOR_ THE 
SOFTWARE SWITCH REGISTER (SEE SECTION 8.5). 
foe ae UNDER ACT, APT OR CHAIN THIS DOES 

5. THE PROGRAM WILL LOOP AND AN END OF PASS AND 
ERROR SUMMARY WILL BE TYPED AT THE END OF 
EVERY PASS. 


OPERATING PROCEDURE 


OPERATIONAL SWITCH SETTINGS 
THE SWITCH SETTING ARE: 


OCTAL 
SW<15>=1. 100000 HALT ON ERROR 
SW<14>=1.. 40000 LOOP ON CURRENT TEST 
SW<13>= aie 20000 INHIBIT ERROR TYPE OUTS 
SW<12>=1... 10900 INHIBIT T-BIT TRAPPING 
SW<11>=1... 4000 INHIBIT ITERATIONS 
SW<10>=1... 2000 RING TTY BELL ON ERROR 
SuK9>=1..<. 1000 LOOP ON ERROR 
SW<8>=1.... 400 LOOP ON TEST SPECIFIED 
THROUGH SW<0> 
Cuc7>et.... 290 PRINT ERROR SUMMARY EVEN 
SW<13>=1, THIS APPLIES ONLY 
PROGRAM CKFPAAO. 
SW<7>21.... 200 SELECT CORRECT INTERRUPT 
PROGRAM CKFPBAO. 
ERRORS 
SUMMARIES 


IN PROGRAM CKFPAQ TESTS 1 AND 11 HAVE A SPECIAL 
ERROR SUMMARY FEATURE. THESE TWO TEST RUN MANY 
TEST PATTERNS THROUGH THE LOGIC. AFTER AN _ ERROR 
IS ENCOUNTERED, ONLY THE FIRST FIVE ERRORS ARE 
REPORTED (TYPED ON THE TTY). EVERY ERROR THOUGH IS 
LOGGED AND AN ERROR SUMMARY IS PRINTED WHEN THE 
TEST IS COMPLETE. NOTE THAT IF SW<13>=1, THIS 
SUMMARY WILL NOT BE TYPED UNLESS SW<7>=1. IN OTHER 
WORDS TO GET JUST AN ERROR SUMMARY FROM EITHER OF 
THESE TWO TESTS 1 AND 11 IN PROGRAM CKFPAAQ BOTH 
SWITCHES 13 AND 7 MUST = 1. 
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ERROR RECOVERY 


SW<15:9>=0... MOST ‘e*: WILL CAUSE EXECUTION TO 
GO TO THE START OF THE NEXT TEST 
AFTER THE MESSAGE IS TYPED. A_ FEW 
TESTS ARE IN SECTIONS. _IN THESE 
TESTS AN ERROR WILL CAUSE EXECUTION 
TO GO TO THE NEXT SECTION AFTER THE 
MESSAGE IS TYPED. 


SW<15>=1... THE PROGRAM WILL HALT AFTER TYPING 
THE ERROR MESSAGE. PRESSING THE 
CONSOLE CONTINUE WILL CAUSE _ THE 
PROGRAM TO CONTINUE AS IF SwW<15>=0. 


RESTRICTIONS 


NONE 


EXECUTION TIMES 
LESS THAN 10 SECONDS FOR EACH PROGRAM ON ANY PASS. 
STACK POINTER 


THE STACK POINTER IS INITIALIZED TO 1100 IN EACH OF 
THE THREE PROGRAMS. 


PASS COUNT 


THE PROGRAM MAKES ONE PASS FOR EACH END OF PASS 
MESSAGE TYPED. THE END OF PASS MESSAGE DESCRIBES 
THE TOTAL NUMBER OF PASSES COMPLETED AND THE TOTAL 
NUMBER OF ERRORS SINCE THE LAST END OF PASS MESSAGE. 


T-BIT TRAPPING 


IF SW<12>=0 EACH PROGRAM WILL RUN WITH TRACE TRAPS 
ON EVERY OTHER PASS. _ FIRST PASS WILL NOT ENABLE 
TRACE TRAPS. NOTE SwW<12>=1 DISABLES T-BIT TRAPS. 


SOFTWARE SWITCH REGISTER 


EACH OF THE THREE PROGRAMS WILL RUN WITH OR WITHOUT 
A CONSOLE SWITCH REGISTER. IF A PHYSICAL CONSOLE 
SWITCH REGISTER IS PRESENT ON THE SYSTEM, THEN THESE 
PROGRAMS WILL GO AHEAD AND USE IT FOR THE SWITCH 
FUNCTIONS DESCRIBED IN 5.1 ABOVE. IF HOWEVER THERE 
IS NO CONSOLE SWITCH REGISTER ON THE ida + & 
SOFTWARE SWITCH REGISTER WILL BE USED. HIS 
SOFTWARE SWITCH REGISTER CAN BE EXAMINED OR MODIFIED 
AT ANY TIME BY THE USER IF HE TYPES CONTROL G WHILE 
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THE PROGR&M IS RUNNING. THIS CONTROL G WILL CAUSE 
THE CONTENTS OF THE SOFTWARE SWITCH REGISTER Me BE 
TYPED ON THE TTY AND ASK THE USER FOR A NEW VALUE. 
+4, THE USER TYPES A VALUE AND CARRIAGE RETURN THEN 

THE PROGRAM WILL RESUME TESTING AT THE SAME POINT AT 
WHICH IT LEFT OFF WHEN THE USER TYPED CONTROL G. 
NOTE THAT WHEN NOT RUNNING UNDER ACT, APT OR CHAIN 
THE USER WiLL BE ASKED FOR A SOFTWARE SWITCH 
REGISTER VALUE AFTER LOADING ADDRESS 200 AND 
STARTING THE PROGRAM THE FIRST TiME THE PROGRAM IS 
RUN AFTER LOADING (ONLY IF NOG CONSOLE SWITCH 
REGISTER IS ON THE SYSTEM). 


INTERRUPTS TEST 


IN PROGRAM CKFPBAO THERE IS A SPECIAL TEST FOR 
CHECKING THE CORRECT FLOWS OF THE FPP. THIS TEST 
CAN BE RUN ONLY IF A SPECIAL TEST MODULE IS_ IN_ THE 
SYSTEM. THIS MODULE WILL PROBABLY ONLY BE USED IN 
MANUFACTURING. IF THIS MODULE IS NOT IN THE SYSTEM 
THIS TEST WILL AUTOMATICALLY BE DESELECTED. IF THIS 
TEST MODULE IS ON THE SYSTEM AND SW<7>=1 THIS TEST 
WILL BE RUN. IF SW<7>=0 THIS TEST WILL BE 
DESELECTED. 


ACT, APT AND XXDP COMPATIBILTY 
THE SE ar? aoe ARE FULLY COMPATIBLE WITH: 


ACT 
XXDP MONITOR AND CHAIN PRCGRAMS. 


PROGRAM DESCRIPTION 


LDFPS, STFPS AND DATA PATHS TEST 


THIS IS A TEST OF THE LDFPS (LOAD FLOATING POINT 
STATUS) AND STFPS (STORE FLOATING POINT STATUS) 
INSTRUCTIONS. A COUNT PATTERN IS GENERATED AND RUN 

THROUGH THE FLOATING POINT STATUS REGISTER. THIS 





— 
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WILL TEST THE 16-BIT TRI STATE BUS WHICH CONNECTS 
THE CPU WITH THE FPP AND ALSO RUNS INTERNALLY WITHIN 
THE FPP. ONLY DMO AND SMO ARE USED. NOTE THAT A 
MASK MUST BE USED BECAUSE SOME OF THE FPS BITS 
CANNOT BE SET. 


ONLY THE ar FIVE ERRORS WILL BE REPORTED 
INDIVIDUALLY. _ THIS JIS_ TO PREVENT LOCKING OUT THE 
COMPLETION OF THE TEST BECAUSE OF VIRTUALLY ENDLESS 
NUMBER OF ERRORS. ONLY FIVE INDIVIDUAL ERRORS WILL 
BE REPORTED THEN THE TEST WILL BE COMPLETED AND AN 
ERROR SUMMARY GIVEN (SEE NOTE BELOW). 


NOTE THAT THIS TEST KEEPS A DYNAMIC RECORD OF THE 
LOGICAL ‘AND’ AND 'OR* OF THE FAILING DATA PATTERNS. 
THESE CAN BE VERY USEFUL IN DETERMINING STUCK BITS. 
IF THE USER HAS THE INHIBIT ERROR TYPE OUT SWITCH 
(SWR13) OFF, THEN THE USER WILL RECEIVE EACH 


WILL INHIBIT ERROR SUMMARY PRINT OUT, EXCEPT IN THE 
CASE ine air TO GET JUST THE ERROR SUMMARY 


WITH NO DIVIDUAL_ ERROR REPORTS, SET SWITCH 
REGISTER BITi3 AND SWITCH REGISTER BIT? BOTH ON. 
CFCC TEST 


THIS IS A TEST OF THE COPY CONDITION CODES 
INSTRUCTION, CFCC. 


SETF, SETD, SETI AND SETL TEST 


THIS IS A TEST OF THE SETF, SETD, SETI AND SETL 
INSTRUCTIONS. EACH INSTRUCTION IS EXECUTED WITH THE 
FPS CONTAINING ALL ONES AND ALSO WITH THE FPS CLEAR. 
THE RESULT OF EACH SITUATION IS CHECKED. 


ILLEGAL FPP OP CODES AND STST TEST 


THIS IS A TEST OF THE FPP OPERATION CODES: 


170003 
170004 


170010 
170013 
170014 


170077 
THESE ARE ILLEGAL INSTRUCTIONS AND WITH INTERRUPTS 


ENABLED OULD CAUSE A_ TRAP TO 244. ALSO TESTED 
HERE IS THE INSTRUCTION: STST R1, WHICH SHOULD PUT 
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TEST 11 


THE FEC CODE 2 IN R1, AFTER ANY OF THE ABOVE OP 
CODES IS EXECUTED. 


FID, INT°RRUPT DISABLE, BIT TEST 


THIS IS A TEST OF FPS 4 14 (FID) OR FLOATING 
INTERRUPT DISABLE. ILLEGAL INSTRUCTION IS 
EXECUTED WITH FID=1. NO MINTERRUPT SHOULD OCCUR. 


LDD AND STD, WITH SRC AND DST MODE 1, TEST 


THIS IS A TEST OF BOTH THE INSTRUCTION: 
LDD (RO) ,ACO 
AND THE INSTRUCTION: 
STD MOST OF THE 


ACO, (RO) 
FAILURES ARE ISOLATED TO THE SRC OR DST FLOWS. NOTE 
THAT THE en OF ACO HAS NOT BEEN ASSURED. 
THIS MEANS THAT IN SOME CASES IT WILL BE IMPOSSIBLE 
TO ISOLATE CERTAIN DATA a7 Ls age FAILURES TO EITHER 
THE FLOWS OR THIS ACCUMULA 


FSRC MODE O TEST 


THIS IS A TEST OF FSRC MODE ZERO USING THE LDD AND 
LDF INSTRUCTIONS. 


FDST MODE O TEST 


THIS IS A TEST OF THE STORE INSTRUCTIONS, STD AND 
STF, WITH FDST MODE 0. 


ACCUMULATORS DATA PATTERNS TEST 


THIS IS A TEST OF THE FLOATING POINT PROCESSOR 
ACCUMULATORS. 


EACH ACCUMULATOR IS y dis IN TWO WAYS: 
1 TEST PATTERN GENERATED BY FLOATING A 
ONE ACROSS A aie OF ZER 
e TEST PATTERN GENERATED BY FLOATING A 
ZERO ACROSS a FIELD OF ONES 

EACH OF ACCUMULATORS ACO THROUGH AC5 IS TESTED. 


NOTE THAT THIS TEST KEEPS A DYNAMIC RECORD OF _ THE 
LOGICAL ‘AND’ AND ‘OR* OF THE FAILING DATA PATTERNS. 
THESE CAN BE VERY USEFUL IN DETERMINING STUCK BITS. 


INDIVIDUAL ERROR MESSAGE PLUS AN ERROR SUMMARY AT 
THE END OF THE TEST. INHIBITING ERROR PRINT OUT 
WILL INHIBIT ERROR SUMMARY PRINT OUT, EXCEPT IN THE 
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a DESCRIBED Wvibote. TO GET JUST THE ERROR SUMMARY 
NO INDIVID ERROR REPORTS, SET SWITCH 
REGISTER BIT13 AND ewiTCH REGISTER BIT? BOTH ON. 


THE FOLLOWING PROCEDURE IS PRESENTED TO AID THE 
TROUBLE SHOOTER IN _ SITUATIONS WHERE AM2901 CHIP 
ISOLATION IS ATTEMPTED. 


WARNING: THIS PROCEDURE ASSUMES THAT THE FAULT IS 
IN ONE OF THE AM2901 CHIPS. THIS ASSUMPTION IS NOT 
NECESSARILY VAL 1D IN ALL SITUATIONS. IT REMAINS T0 
BE SEEN WHAT NUMBER OF FAILURES CAN 
wat tate” lettin ASSOCIATED WITH THEM. NOTE ALSO 
THA THIS INFORMATION SHOULD NOT BE _ TAKEN AS 
ABSOLUTE, THAT IS THIS INFORMATION IS_ THE AUTHOR'S 
SUGGESTION FOR ACHIEVING ISOLATION WHEN CHIP LEVEL 
REPAIR IS NECESSARY. 


WHEN THIS TEST HAS FINISHED RUNNING, IF ERRORS HAVE 

OCCURRED, AN ERROR SUMMARY WILL BE TYPED. THUS 

SUMMAR Y WILL CONSIST OF TWO IMPORTANT QUANTITIES: 
FOUR SIXTEEN BIT ae LABELED THE 
LOGICAL Kn (**") OF THE FAILING 


DATA PATTERN 
B. FOUR SIXTEEN. B17 ,NUMBERS LABELED THE 
CAL__‘OR* +") OF THE FAILING 


LOGICAL 
DATA PATTERNS. 


A BIT STUCK #iGn IN THE HARDWARE WILL SHOW UP AS A 0 
eee POSITION OF THE *OR* OF THE FAILING DATA 
N . 


A BIT STUCK LOW IN THE HARDWARE WILL SHOW UP AS 1 
IN THAT BIT POSITION OF THE ‘AND* OF THE FAILING 
DATA PATTERNS. 


THUS IF A oe Bet 
A. TUCK HIGHS wILL SHOW AS 0°S IN THE 
*OR' PATTERN. 
B. STUCK LOWS WILL SHOW AS 1°S IN THE 
*AND' PATTERN. 


IF THE FAILURE IS INTERMITTANT THEN THIS PROCEDURE WILL 


STILL APPLY!! IF THE FAILURE MOVES FROM ONE BIT TO 
ANOTHER, OR FROM ONE GROUP OF BITS TO ANOTHER GROUP 
OF BITS THEN THE FAULT WILL PROBABLY NOT SHOW UP_IN 
THE ‘AND’ OR THE ‘OR’ PATTERNS; IN THIS CASE THE 
*AND' PATTERN WILL BE ALL .. § AND THE ‘OR’ PATTERN 
WILL BE ALL 1°S. WHEN THIS OCCURS SOME OTHER METHOD 
OF REPAIR MUST BE FOUND (SUCH AS INSPECTION OF EACH 
Sd a ae ERROR REPORT RATHER THAN USING THE 


MAP THE FOLLOWING NOTATION ONTO EACH BIT POSITION IN 
THE "AND’ AND i *OR' PATTERNS WHICH ARE TYPED IN 
THE ERROR SUMMARY 
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A15,A14,...A1,A0 B15,B14,...B1,B0 
€15,014,...C1,C0 D15,014,...C1,C0 

IN THIS NOTATION A15 THROUGH AO IS THE FIRST OF THE 

FOUR 16 BIT OCTAL NUMBERS TYPED, B15 THROUGH BO IS 


THE SECOND, ETC. 
THIS TABLE SHOWS THE CORRESPONDING AM2901 CHIP ('‘E' 
NUMBER) WHICH IS ation mote. $y EACH BIT "tee 


E MI I 
UP DATED. NOTE ALSO THAT THERE ARE FOUR BITS 
EACH AM2901 CHIP: 


BITS AM2901 CHIP NUMBER 
A15,A14,A13,A12 £37 
A11.A10.A9,A8 E45 
A7,A6, ag. rv E34 
A3.A2.A1.A0 E42 
B15, B14, B13. B12 £33 
B11.B810.B9,B E41 
B7.R6, Bs. B4 £36 
B3.B2.B1.B0 £44 
15, C14, €13,C12 E35 
€11.€10.C9,C8 £43 
C7,(6, cS. C4 £38 
€3.€2.€1.C0 E46 
D15, DI4, D13,D12 E39 
DIT D D9,b8 E47 
66. we D4 E40 
D3. D2.D1.D0 E48 


NOW FIVE IMPORTANT CASES WHICH WILL ARRISE WHEN A 
FAULTY AM2901 IS PRESENT CAN BE DESCRIBED: 


Vad IF ONLY ONE BIT OF THE 64 BITS IS _INCORRECT 
THE CHIP cela IN THE ABOVE TABLE IS 
MOST PR T FAULT. BUT IF THAT CHIP IS 
REPLACED AND THE ERROR PERSISTS THEN SUPPOSE 
THAT BIT IS, 


LN WHERE ‘L’ IS A, B, C OR D 
AND N IS 15, 14, ... OR 0 


THEN IN GENERAL ANY OF THE FOUR CHIPS 
RESPONSIBLE FOR AN, BN, CN OR DN COULD BE AT 
FAULT, WITH LN BEING MOST PROBABLE. 


OR EXAMPLE _IF BiT C12 IS FAULTY, 
THEN CHIP E79 IS THE MOST 
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PROBABLE SOURCE OF THE ERROR. IF REPAIRING 

THAT CHIP_DOES NOT REMOVE THE FAULT THEN TRY 

EACH OF THE CHIPS ASSOCIATED WITH BITS Aled, 

B12 AND D12 SHOULD BE TRIED WITH oa ot 
PROBABILITY OF THE FAULT BEING IN ANY ONE 

THESE OTHER THREE CHIPS, TRY CHIPS E61, E86. AND £78. 


IF THERE ARE FOUR a BITS IN ERROR, 
FOLLOWING THE PATTERN 


LN, LN+1, LN+2 AND LN+3 WHERE ‘L' IS A, B, C OR D 
N=0, 4, 8 OR 12 


THEN THE ABOVE (ABLE SHOULD DIRECTLY 
IDENTIFY THE FAILING CHIP. 


IF 4+ ol BITS ARE DROPPED WHICH FIT THE 
PATTERN 


te CN AND DN WHERE N=15, 14, ... OR O 


THEN ANY ONE OF THE FOUR CHIPS ASSOCIATED 
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WITH EACH OF THE BITS AN, 
COULD BE AT FAULT WITH EQUAL PR 


BN, CN AND DN 
OBABILITY. 


SEQ 0014 
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4.) IF . a =e ARE IN ERROR, FITTING THE 
PATTERN 


AN, AN+1, AN+2, sa WHERE N=0, 4, 8 OR 12 
+ 
CN, CN+1, CN*2, CN+3 
AND 
DN, DN+1, DN+2, AN+3 


THEN ANY ONE OF THE FOUR CHIPS ASSOCIATED 
WITH THESE BITS COULD BE AT FAULT WITH EQUAL 
PROBABILITY. 


5.) IF THE FAILING BIT PATTERNS DISPLAYED IN THE 
"AND" AND THE ‘OR’ DATA TYPED IN THE SUMMARY 
DOES NOT CONFORM EXPLICITELY TO ANY OF _ THE 
ABOVE PATTERNS, THEN THE TROUBLE SHOOTER 
MUST INTUITIVELY TRY TO FIND WHICH OF _ THE 
ABOVE CASES (1 THROUGH 4) IS A ‘BEST FIT" OF 
THE SYMPTOMS. 


FPP ACCUMULATORS DUAL ADDRESS TEST 


THIS TEST PERFORMS A DUAL ADDRESSING TEST ON _ THE 
FLOATING ACCUMULATORS. — NOTE THAT ACCUMULATOR ZERO 
IS USED TO ACCESS ALL THE OTHERS. 


FSRC MODE O WITH ILLEGAL ACCUMULATOR TEST 


THIS IS A TEST OF FSRC MODE 0 WITH ACCUMULATORS 6 
AND 7. USE OF EITHER OF THESE NON-EXISTENT 
ACCUMULATORS SHOULD RESULT IN A TRAP TO 244 WITH 
FEC=2 (ILLEGAL FPP INSTRUCTION). 


FSRC MODE 2 TEST 


THIS IS A TEST OF FSRC MODE 2, AUTO INCREMENT MODE. 
FSRC MODE 4 TEST 


THIS IS A TEST OF FSRC MODE 4, AUTO DECREMENT MODE. 
FSRC MODE 2, WITH FD=0, TEST 


THIS IS A TEST OF FSRC MODE 2 WITH FD=0. (AUTO 
INCREMENT ) 


FSRC MODE 2 WITH GR7, IMMEDIATE MODE, TEST 


SEQ 0015 


ER 
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SEQ 0016 


724 THIS IS A TEST OF FSRC MODE 2 USING GR7 (THE PC). 
725 THIS IS IMMEDIATE MODE. 


727 TEST 20 FSRC MODE 3 TEST 


730 THIS IS A TEST OF FSRC MODE 3, AUTO INCREMENT 
731 DEFERRED 


733 TEST 21 FSRC MODE 5 TEST 
734 


736 THIS IS A TEST OF FSRC MODE 5, AUTO DECREMENT 
44 DEFERRED. 


7 
739 TEST 22 FSRC MODE 6 TEST 


742 THIS IS A TEST OF FSRC MODE 6, INDEX MODE 


744 TEST 23 FSRC MODE 7 TEST 

ag a 

746 

ns THIS IS A TEST OF FSRC MODE 7, INDEX DEFERRED MODE. 
a4 TEST 24 (BUT EZBT Y8),(BUT ENBT) AND (BUT FIUV) TEST 
751 

752 THIS IS A TEST OF THE (BUT EZBT Y8) FORK, THE (BUT 
753 ENBT) FORK AND (BUT FIUV) FORK IN THE LOAD 
754 INSTRUCTION FLOWS. 

755 EACH OF THE PATTERNS: 

756 

757 0 

758 +NUM 

759 -NUM 

fs 

762 IS LOADED TWICE, ONCE WITH AC>O0 THEN WITH AC=0. 
763 AFTER EACH LOAD THE FPS IS CHECK TO INSURE THAT 
we —- CONTROL WAS PASSED THROUGH WITH THE FORKS PROPERLY. 
766 TEST 25 ADDF ,ADDD,SUBF AND SUBD WITH FSRC=AC=0 TEST 


THIS IS A TEST OF ADD AND SUB WITH FSRC=AC=0 
TEST 26 ADDD AND SUB WITH FSRC=0 





THIS IS A TEST OF ADD AND SUB WITH FSRC=0. 
TEST 27 SUBD WITH AC=0 TEST 








BOTH POSITIVE AND 





THIS IS A TEST OF SUBD WITH AC=0. 
NEGATIVE FSRC*S ARE TRIED. 
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SEQ 0017 ER 


781 
782 TEST 30 ADDD WITH AC=0 TEST 
B80 a ee 

784 
788 POSITIVE AND NEGATIVE FSRC'S ARE TRIED. 
787 TEST 31 ADDF AND ADDD WITH E(AC)=E(FSRC) AND (BUT FT) TEST 
789 
790 THIS IS A TEST OF THE ADD INSTRUCTION WITH THE 
791 OPERANDS HAVING EQUAL EXPONENTS. THE (BUF FT) FORK 
£92 IN THE ROUND/TRUNK FLOWS IS ALSO TESTED. 
79% TEST 32 ADDF AND ADDD WITH E(AC) LESS THAN E(FSRC) TEST 
796 
797 THIS IS ATEST OF THE ADDD AND ADDF INSTRUCTIONS AND 
798 THE ALIGN AC ALGORITHM FLOWS. THE CONSTANT (25 FOR 
799 FLOATING, 57 FOR DOUBLE) USED IS CHECKED. THEN 
800 SIMPLE AND WORST CASE ALIGNMENT SITUATIONS ARE 
801 TRIED. NOTE E(AC) IS LESS THEN E(FSRC) 
803 
804 TEST 33 ADDF AND ADDD WITH E(AC) GREATER THAN E(FSRC) TEST 
806 
807 THIS IS A TEST OF THE ADDD AND ADDF INSTRUCTIONS AND 
808 THE ALIGN FSRC ALGORITHM FLOWS. FIRST THE CONSTANT 
809 USED IS CHECKED. THEN SIMPLE AND WORST CASE 
810 ALIGNMENT SITUATIONS ARE TRIED. NOTE ECAC) IS 
+8 GREATER THAN E(FSRC). 

| 
815 TEST 34 ADDD WITH NEGATVE OPRANDS TEST 
815 
816 THIS IS A TEST OF THE ADDD INSTRUCTION WITH NEGATIVE 
817 OPERANDS. EVERY COMBINATION OF OPERAND SIGNS IS 
818 TRIED. 
819 
820 TEST 35 SUBD TEST 
Bap ae 
822 
823 THIS IS A TEST OF THE SUBD INSTRUCTION. BOTH A 
824 POSITIVE AND A NEGATIVE NUMBER IS SUBTRACTED FROM IT 
825 SELF 
826 
827 TEST 36 NORMALIZE ALGORITHM TEST 
ES See Se hee cameraman 
830 THIS IS A TEST OF THE NORMALIZE FLOW ALGORITHM. TWO 
831 PATTERNS ARE USED, FIRST THE MINIMUM SITUATION 
832 REQUIRING ONE LEFT SHIFT AND THEN THE MAXIMUM 


SITUATION REQUIRING 56 SHIFTS. 
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SEQ 0018 EF 
838 
839 
840 
841 
842 
843 
844 10. LISTING 
5 ae a eee ee ee ee ee 
846 
847 
848 
849 
850 
851 
852 
853 
854 & 
855 
856 000213 MNUMBE R=21 3 
857 000001 PROGNUM= 1 
858 
859 
860 
861 -LIST ME 
<9 -NLIST MD,MC,CND 
1092 000000 -ENABL ABS 
1099 -MCALL .HEADER,.SWRHI,.EQUAT,.SETUP,.$CATCH,.$ACT11,.$CMTAG 
1100 -MCALL .$EOP,.$SCOPE,.$ERROR, .S$SAVE,.$IYPE,.$TYPOCT 
1101 -MCALL .S$TYPDEC,.$TRAP,.SPOWER,.SAPTHDR,.$APTBLS 
1102 -MCALL .$APTYPE,.S$READ 
1103 -MCALL .EQUIV ;*REMOVE FOR ASSEMBLY ON PDP=-10 
1104 -TITLE CKFPAAO FP11F FLTG PNT PRT A 
;*COPYRIGHT (C) 1979 
:*DIGITAL EQUIPMENT CORP. 
; *MAYNARD, MASS. 01754 
-* 
THIS PROGRAM WAS ASSEMBLED USING THE PDP-11 MAINDEC SYSMAC 
s #PACKAGE (MAINDEC-11-DZQAC-C3), JAN 19, 1977, 
000001 $1N 
1105 160000 $ swR=160000 72HALT ON ERROR, LOOP ON TEST, INHIBIT ERROR TYPOUT 
1106 
1107 000244 FPVECT=244 
1108 177400 $SWR=177400 
1109 000200 $SWRMSK=200 
1110 000011 TAB=11 
4 be 000015 CRLF=15 
1113 -SBTTL BASIC DEFINITIONS 
;*INITIAL ADDRESS OF THE STACK POINTER *** 1100 *** 
001100 STACK= 1100 
104000 ERROR=EMT 
000004 


SCOPE=I0T 
3 *MISCELLANEOUS DEFINITIONS 


CKFPAAO FP1IF FLTG PNT PRT A 
BASIC DEFINITIONS 


MACRO M1111 
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26-SEP-79 Cl 
SEQ 0019 El 
HT= 11 ;;CODE FOR HORIZONTAL TAB 
{fc 12 +s CODE FOR LINE FEED 
CR= 15 ;CODE FOR CARRIAGE RETURN 
CRLF= 200 ; CODE FOR CARRIAGE RETURN-LINE FEED 
PS= has ;zPROCESSOR STATUS WORD 
W= 
STKLMT= 177774 +s STACK LIMIT REGISTER 
PIRQ= 177772 PR INTERRUPT REQUEST REGISTER 
DSWR 177570 ; HARDWARE SWITCH REGISTER 
DDISP= 177570 ;HARDWARE DISPLAY REGISTER 
> *GENERAL PURPOSE REGISTER DEFINITIONS 
RO= x0 : GENERAL REGISTER 
R1= %1 ;GENERAL REGISTER 
Re= %2 +: GENERAL REGISTER 
R3= %3 7 :GENERAL REGISTER 
R4= 4 ::GENERAL REGISTER 
R5= %5 : GENERAL REGISTER 
R6= %6 ;:GENERAL REGISTER 
R7= %7 se ttate t REGISTER 
SP= %6 ;STACK POINTER 
%7 PRO GRAM COUNTER 
*PRIORITY LEVEL DEFINITIONS 
PRO 0 ;zPRIORITY LEVEL 0 
PR1= 40 sPRIORITY LEVEL 1 
PR2= 100 sPRIORITY LEVEL 2 
PR3= 140 : PRIORITY LEVEL 3 
PR4&= 200 ;zPRIORITY LEVEL 4 
PR5= 240 szPRIORITY LEVEL 5 
PR6= 300 : ;PRIORITY LEVEL 6 
PR 7= 340 ITY LEVEL 7 
;* “SWITCH REGISTER" SWITCH DEFINITIONS 
Sw 0000 
SW14= 0000 
SwW13= 20000 
SW12= 10000 
SW1i= 4000 
Swi0= 2000 
Sswo9= 1000 
SwO8= 400 
SwO7= 200 
SwO6= 100 
SwOS5= 40 
SwO4= 20 
SwO3= 10 
SwWO2= 4 
SwOl1= 2 
SwOO= 1 
SW9=SWO09 
SW8=SW08 
SwW7=SwW07 
SW6=SW06 
SwW5=Sw05 
SW4=SWw04 
SW3=SwWw03 
SW2=Sw02 
Sw1=SwW01 
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BASIC DEFINITIONS 


ee at ot ns ns 
em ae et es 


WENM=-OCOONAWS 








*DATA a! DEFINITIONS (RBITOO TO BIT15) 
BIT15= 10000 
BIT14= 40000 
BIT13= 20000 
BIT12= 10000 
BIT11= 4000 
BIT10= 2000 
BITO9= 1000 
BITO8= 400 
BIT07= 200 
BITO6= 100 
BITOS= 40 
BITO04= 20 
BITO3= 10 
BITO2= 4 
BITO1= 2 
BITOO= 1 
BIT9=BITO9 
BIT8=B1T08 
B1T7=B1T07 
BIT6=B1T06 
BITS=BITO5 
BIT4=BiT04 
BIT3=B1T03 
BIT2=BIT02 
BIT1=B1TO1 
BI TO=B1T00 
:*BASIC ‘'CPu’' TRAP VECTOR entons 
ERRVEC= 4 TIME OUT AND OTHER ERRORS 
RESVEC= 10 RESERVED AND ILLEGAL INSTRUCTIONS 
TBITVEC=14 :T BIT 
TRIVEC= 14 [TRACE TRAP 
BPTVEC= 14 * UBREAKPOINT TRAP (BPT) 
IOTVEC= 20 0 al TRAP (IOT) **SCOPE** 
PWRVEC= 24 POWER FAIL 
EMTVEC= 30 ; ;EMULATOR TRAP (EMT) **ERROR** 
TRAPVE (=34 RAP’* TRAP 
TKVEC= 60 iiTTy KEYBOARD VECTOR 
TPVEC= 64 :TTY PRINTER VECTOR 
PIRQVEC=240 PROGRAM INTERRUPT REQUEST VECTOR 
.SBTTL FPP REGISTER DEF INITIONS 
ACO =%0 
AC] =Z7 
AC2 =%2 
AC3 =%3 
AC4 =%4 
AC5 =%5 
AC6 =%6 
AC7 =%7 





~ SBTTL J CATCHER 


:*ALL UNUSED LOCATIONS FROM 4 ~ 776 CONTAIN A ‘'.#2,HALT"’ 
>*SEQUENCE TO CATCH ILLEGAL TRAPS AND INTERRUPTS 
LOCATION, 0 CONTAINS 0 TG CATCH IMPROPERLY LOADED VECTORS 





DISPREG: .WORD © 





2 SOFTWARE DISPLAY REGISTER 


CKFPAAQ FPIIF FLTG PNT PRT A 
TRAP CATCHER 


000176 000000 
000200 000137 003606 
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SWREG: -WORD 0 s SOFTWARE SWITCH REGISTER 
.SBITL STARTING ADDRESS(ES) 
JMP @ASTART ;; JUMP TO STARTING ADDRESS OF PROGRAM 


SEQ 0021 


1726 


CKFPAAO FPI11F FLTG PNT PRT A 
OMMON TAGS 


J 
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- SBTTL 


COMMON TAGS 
SORE III ISISIUIUIUII IIDC ISIUIUIUIOIOIIUIIUIOIISIOIUIUIOIUIOI IIR I IE its 
*THIS TABLE CONTAINS VARIOUS COMMON STORAGE LOCATIONS 

> *USED IN Beat 


SEQ 0022 | 


ama 


001100 = 
001100 SCMTAG: 3¢START OF COMMON TAGS 
001100 000000 -WORD 0 
001102 000 $TSTNM: .BYTE 0Q 3-CONTAINS THE ae NUMBER 
001103 000 SERFLG: .BYTE OQ ;: CONTAINS ERROR FLAG 
001104 000000 $ICNT: .WORD 0 CONTAINS SUBTEST ITERATION COUNT 
001106 000000 $LPADR: .WORD 0 ::CONTAINS SCOPE LOOP ADDRESS 
001110 000000 $LPERR: .WORD 0 :-CONTAINS SCOPE RETURN FOR ERRORS 
001112 000000 SERTTL: .WORD 0 ;:CONTAINS TOTAL ERRORS DETECTED 
001114 000 SITEMB: .BYTE 0 ;;CONTAINS ITEM CONTROL BYTE 
001115 001 SERMAX: .BYTE 1 ;sCONTAINS MAX. ERRORS PER TEST 
001116 000000 SERRPC: .WORD 0 ;sCONTAINS PC OF LAST ERROR INSTRUCTION 
001120 $GDADR: .WORD 0 ::CONTAINS ADDRESS OF ‘GOOD' DATA 
001122 000000 $BDADR: .WORD 0 37 CONTAINS Tost re "BAD" DATA 
001124 000000 $GDDAT: .WORD 0 ;:CONTAINS ‘GOOD’ 
001126 000000 $BDDAT: .WORD 0 :=CONTAINS ‘BAD' DATA 
001130 000000 -WORD 0 ; ;RESERVED--NOT TO BE USED 
001132 000000 -WORD 0 
001134 000 $AUTOB: .BYTE 0 ; ;AUTOMATIC MODE INDICATOR 
001135 000 $INTAG: .BYTE OQ 3: INTERRUPT MODE INDICATOR 
001136 000000 -WORD 0 
001140 177570 SWR : «WORD DSWR ADDRESS OF SWITCH REGISTER 
001142 177570 DISPLAY: .WORD DDISP ADDRESS OF DISPLAY REGISTER 
001144 177560 $TKS: 177560 qk KBD STATUS 
001146 177562 $TKB: 177562 TTY KBD BUFFER 
001150 177564 $TPS: 177564 T:TTY PRINTER STATUS REG. ADDRESS 
001152 177566 $TPB: 177566 i; TTY PRINTER BUFFER REG. om th 
001154 000 $SNULL BYTE 9 ;:CONTAINS NULL CHARACTER FOR FILLS 
001155 $SFILLS: .BYTE 2 ss CONTAINS # OF FILLER CHARACTERS "ounee 
001156 012 SFILLC: .BYTE 12 23 INSERT FILL CHARS. AFTER A ‘LINE F 
001157 000 STPFLG: .BYTE 0 :"TERMINAL AVAILABLE’ FLAG (Bl T<07>" O YES) 
001160 000000 SRE GAD 0 >: CONTAINS THE ADDRESS FROM 
icWHICH ($REGO) WAS OBTAINED 
000624 REPT $CM3 
001162 000000 $REGO WORD 0 3-CONTAINS (($REGAD) +0) 
001164 000000 $REGi WORD 0 3: CONTAINS (($REGAD) +2) 
000000 $REG2 WORD 0 ;:CONTAINS (($REGAD) +4) 
001170 000000 $REG3 WORD 0 CONTAINS (($REGAD) +6) 
001172 000000 $REG4 WORD 0 CONTAINS (($REGAD) +10) 
001174 000000 $REG5: .WORD 0 ::CONTAINS (($REGAD) +12) 
001176 000000 $REG6 WORD 0 ie AINS (($REGAD) +14) 
000000 $REG7: .WORD 0 7:CONTAINS (($REGAD) +16) 
001202 000000 $REGIO: .WORD 0 7: CONTAINS (($REGAD) +20) 
001 000000 $REG11: .WORD 0 7-CONTAINS (($REGAD) +22) 
000000 $REGI2: .WORD 0 7:CONTAINS (($REGAD) +24) 
001210 000000 $REG13: .WORD QO i=CONTAINS ((S$REGAD) +26) 
001212 000000 $REG14: .WORD 0 3: CONTAINS (($REGAD) +30) 
001214 000000 $REG15: .WORD 0 7 CONTAINS (($REGAD) +32) 
001216 000000 $REG16: .WORD 0 72 CONTAINS (($REGAD) +34) 
000000 $REGI17: .WORD 0 7: CONTAINS (($REGAD) +36) 
001222 000000 $REG20: .WORD 0 CONTAINS (($REGAD) +40) 
001224 000000 $REG21: .WORD 0 CONTAINS (($REGAD) +42) 
001226 000000 $REG22: .wORD 0 SICONTAINS (($REGAD) +44) 


C 


000000 
000024 


CKFPAAO FP11F FLTG PNT PRT A 
OMMON TAGS 


377 


000 
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377 


$REG23: 


SCAPE : 
$BELL: 
S$QUES: 


$CRLF: 
$LF: 


. WORD 
2 


oo: 


-ASCIZ 


-ASCI! 
-ASCII 
-ASCIZ 


lelelelelelelelelelelelelelelelelelelelomg®) 
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CONTAINS (($REGAD) +46) 
USER DEFINED 


NUMBER OF ITERATIONS 
— ON ERROR ADDRESS 


SES ESCAP 
<207><377><377> t: CODE FOR BELL 


/?/ 
<15> 
<12> 


7 QUESTION MARK 
7 - CARRIAGE RETURN 
;cLINE FEED 


DLR A EEE REAR RE REREERERREREERER ERE ERE 


-SBTTL APT MAILBOX-ETABLE 


SEAR RARER RARER EERE REE ERE ERREERE RARER EE 


“EVEN 


AMAM 
AMTYP1 


3; 7APT MAILBOX 
32MESSAGE TYPE CODE 
2 ¢FATAL ERROR NUMBER 


LENGTH 
T ENVIRONMENT TABLE 
ENVIRONMENT BYTE 
oT Sulton MODE BITS 


bits 15- by =CPU T 
1/04=01, "11 /05= 02.11/20=03,11/40=046,11/45=05 
11776=06,PD Q=07 ,Q=10 
BIT 10=REAL TIME CLOCK 
BIT 9=FLOATING POINT eoeceseee 
BIT MORY MANAGEMENT 
: HIGH ADDRESS.M.S. BYTE 
:MEM, TYPE ,BLKA1 
MEM.TYPE BYTE = (HIGH BYTE) 


SEQ 0023 


amo 


CKFPAAQ FPI1F FLTG PNT PRT A 
APT MAI. BOX-E TABLE 
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ADDW15 


SEQ 0024 


900 NSEC CORE=001 
300 NSEC ae aa 
500 NSEC MO ees 
; HIGH ADDRESS ,BLK# 
MEM.LAST ADDR. =3 BYTES, THIS WORD AND LOW OF ‘'TYPE'’ ABOVE 
: HIGH ADDRESS,M.S. BYTE 
: oMEM. TYPE ,BLKA#2 
33MEM.LAST ADDRESS ,BLK#2 
GH ADDR SS .M.S.BY TE 


:IHIGH ADDRESS, ae .S.BYTE 


oe ot¥ KA 
MEM. LAST “ADDRESS, BLKA4 
‘ PINTERRUPT VECTORA1 -BUS PRIORITY#1 
BASE ADOR VECTOR#2BUS PRIORI TY#2 
sevice we OF EQUIPMENT UNDER TEST 


Vv 
7: CONTROLLER DESCRIPTION WORDA1 
: ; «CONTROLLER DESCRIPTION WORD#2 
WORD#O 


DESCRIPTOR 
DESCRIPTOR 


DESCRIPTOR 
DESCRIPTOR 
DESCRIPTOR 
DESCRIPTOR 
DESCRIPTOR 
DESCRIPTOR 
DESCRIPTOR 
; DESCRIPTOR 
© DEV VICE DESCRIPTOR 





——_ 
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001442 
001442 
001450 


001452 
001460 


001462 
001470 


001472 
001500 


001502 
001510 


001512 
001520 


001522 
001530 


001532 
001540 


001542 
001550 


001552 
001560 


001562 
001570 


001572 
001600 
001602 
001610 


001612 
001620 


001622 
001630 


000213 
043061 
066645 
043116 
066655 
043162 
066665 
043227 
066665 
043267 
066675 
043323 
066675 
043355 
066675 
043267 
066675 
043410 
066675 
000000 
066711 


000000 
066743 


043471 
066675 


043614 
066675 
043737 
066757 
044010 
066665 
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067720 


067742 


067764 


067764 


070006 


070040 


070040 


970040 


070040 


070062 


070150 


070040 


070040 


070202 


067764 


M 
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SEQ 0025 


.-SBTTL ERROR POINTER TABLE 
*THIS TABLE CONTAINS THE INFORMATION e- EACH ERROR THAT CAN OCCUR. 
>*THE INFORMATION IS Te RARER Iie USING T R 


ie 


3 *NOT 


; *NOTE 


-* 
-* 


ERRTB: 


ITEM 


; ITEM 


ITEM 


s ITEM 


ITEM 


s ITEM 


; ITEM 


s ITEM 


7; ITEM 


ITEM 


Z ITEM 


7 1TEM 


: ITEM 


Z ITEM 


ZITEM 


;*LOCATION $ITEMB. THIS 
El: IF $ 


2: 
EM 
DH 
DT 


oR 
: 
2 


3 


HE INDEX NUMBER FOUND IN 
NDICATES WHICH ITEM IN THE a 28 # ; PERTINENT. 
ITEMB IS 0 THE ONLY PERTINENT DATA _IS ($ERR 
F."H ITEM IN THE TABLE CONTAINS 4 POINTERS EXPLAINED AS FOLLOWS: 
+ sPOINTS TO THE ERROR MESSAGE 


; T 
 IPOINTS TO THE DATA FORMAT 
MNUMBER 
EM1,DH1,DT1,DF1 


EM2,DH2,DT2,DF2 
EM3,DH3,DT3,DF3 
EM4 ,DH4,DT4,DF4 
EMS ,DH5,DT5,DF5 
EM6 ,DH6,DT6,DF6 
EM7 ,DH7,DT7,D&7 
EM10,DH10,DT10,DF10 
EM11,DH11,D1T11,DF11 
EM12,DH12,DT12,DF12 
EM13,DH13,D113,DF 13 
EM14,DH14,DT14,DF 14 
EM15,DH15,D115,DF15 
EM16,DH16,DT16,DF 16 


EM17,DH17,D117,DF17 


—-_ 
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ERROR POINTER TABLE 


001632 
001640 


001642 
001650 


001652 
001660 
001662 
001670 


001672 
001700 


001702 
001710 


001712 
001720 


001722 
001730 


001732 
001740 


001742 
001750 


001752 
001760 


001762 
001770 


001772 
002000 
002002 
002010 
902012 
002020 
002022 
002030 
002032 
002040 


002042 
002050 


002052 
002060 


044243 
066766 


044421 
066776 


044552 
067002 
044552 
067014 


044552 
067024 


044637 
067033 


044752 
067057 


044752 
067104 


045020 
067124 


045072 
067057 


045072 
067104 
045140 
067140 


045201 
067166 


045303 
067166 


045405 
067166 
045506 
067166 


045607 
067212 


045760 
067240 


046015 
067254 
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070222 


070244 


070256 


070304 


070326 


070352 


070422 


070476 


070540 


070422 


070476 


070572 


070650 


0670650 


070650 


070650 


070572 


070722 


070754 


s1TEM 


20 


«WORD 


71TEM 21 
. WORD 


ITEM 22 
. WORD 


ITEM 23 
WORD 


ZITEM 


7; ITEM 


: ITEM 


Z ITEM 


SITEM 


ITEM 


7: ITEM 


s ITEM 


7 ITEM 


: ITEM 


Z ITEM 


Z ITEM 


: ITEM 


ZITEM 


:1TEM 


24 


25 


26 


27 


EM20,DH20,DT20,DF 20 
EM21.DH21,DT21,DF 21 
EM22 ,DH22 ,DT22.,DF 22 
EM23,DH23,D123,DF 23 
EM24 ,DH24 ,DT24 ,DF 24 
EM25 ,DH25,DT25,DF 25 
EM26,DH26 ,DT26,DF 26 
EM27 ,DH27 ,DT27,DF 27 
EM30,DH30 ,DT30,DF 30 
EM31,DH31,D131,DF 31 
EM32,DH32,DT32,DF 32 
EM33,DH33,D133,DF 33 
EM34 ,DH34 ,DT 34 ,DF 34 
EM35 ,DH35 ,DT35 DF 35 
EM36 ,DH36 DT 36,DF 36 
EM37,DH37,DT37,DF 37 
EM40,DH40,DT40,DF40 
EM41,DH41,D141,DF41 


EM42,DH42,D142,DF42 


=— 
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002062 
002070 
002072 
002100 


002102 
002110 


002112 
002120 


002122 
002150 
002132 
002140 


002142 
002150 


002152 
002160 


002162 
002170 


002172 
002200 


002202 
002210 


002212 
002220 


002222 
002230 
002232 
002240 


002242 
002250 


002252 
002260 
002262 
002270 


002272 
002300 


002302 
002310 


046136 
067254 


046257 
067302 


046257 
067325 


046322 
067352 


046400 
067404 


046516 
067421 


046614 
067445 


046655 
067404 


046776 
067463 


047173 
067472 


047237 
067404 


047360 
067463 


047555 
067472 


047621 
067463 


050016 
067472 


050062 
067472 


050254 
067472 


050446 
067510 


050446 
067510 


065041 


065060 


065041 


065104 


065104 


063654 


064546 


065156 


063654 


064546 


065156 


064546 


065156 


065156 


065156 


065266 


065217 
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070754 


071032 


071102 


071156 


071244 


070650 


071276 


071244 


071334 


071354 


071244 


071334 


071354 


071334 


071354 


071354 


071354 


071412 


071412 


s ITEM 43 


7; ITEM 


s ITEM 


; ITEM 


ZITEM 


7; ITEM 


s ITEM 


: ITEM 


7 ITEM 


7 1TEM 


ZITEM 


7 ITEM 


ZITEM 


ITEM 


Z ITEM 


7 ITEM 


: ITEM 


ZITEM 


sITEM 


WORD 
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EM43,DH43,D143,DF43 


FM44 ,DH44 ,DT44,DF 44 


EM45 ,DH45 D145, DF45 


EM46,DH46,0146,DF 46 


EM47 ,DH47,0147,DF47 


EM50,DH50,DT50,DF 50 


EM51,DH51,D151,DF 51 


EMS2,DH52,DT52,DF 52 


EMS3,DH53,D153,DF53 


EMS4 ,DH54 ,DT54,DF54 


EMS5,DH55,DT55,DF 55 


EMS6,DH56,D156,DF 56 


EMS7,DH57,DT57,9F 57 


EM60 ,DH60 ,DT60, DF 60 


EM61,DH61,0161,DF61 


EM62 ,DH62 ,DT62,DF 62 


EM63,DH63,D163,DF 63 


EM64 ,DH64 ,DT64 , DF 64 


EM65 ,DH65 ,DT65 ,DF65 


SEQ 0027 





an 
WE 
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002312 
002320 


002322 
002330 
002332 
002340 


002342 
002350 
002352 
002360 
002362 
002370 
002372 
002400 


002492 
002410 


002412 
002420 


002422 
002430 


002432 
002440 


002442 
002450 


002452 
002460 


002462 
002470 


002472 
002500 


002502 
002510 


002512 
002520 


002522 
0025 30 


002532 
002540 


050602 
067472 


050645 
066776 


051076 
067517 
051221 
067517 


051323 
067541 


051377 
067472 


051437 
066776 


051670 
067517 


052013 
067517 


052115 
067541 


052171 
067472 


052231 
067517 
052355 
067541 
052427 
067517 
052532 
067472 
052573 
067517 
052720 
067541 


052773 
067517 
053077 
067472 
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071354 


070244 


071432 


071432 


071500 


071354 


070244 


071432 


071432 


071500 


071354 


071432 


071432 


071432 


071354 


071432 


071500 


071432 


071354 


7; ITEM 
7 1TEM 
7 1TEM 
;1TEM 
7 1TEM 
7 1TEM 
7; 1TEM 
; ITEM 
7; 1TEM 
7 1TEM 
7; 1TEM 
7 ITEM 
ITEM 
7; 1TEM 
ITEM 
7; 1TEM 
7 1TEM 
7 1TEM 


7 1TEM 


66 
. WORD 
67 


c 2 
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EM66 , DH66 ,DT66 , DF 66 
EM67 ,DH67 ,D167,DF 67 
EM70,DH70,DT70,DF 70 
EM71,DH71,D171,DF 71 
EM72,DH72,D172,DF72 
EM73,DH73,D173,DF73 
EM74 ,DH74,DT74,DF 74 
EM75 ,DH75 ,DT75 ,DF75 
EM76,DH76,D176,DF 76 
EM77,DH77,D177,DF77 
EM100,DH100,DT100,DF 100 
EM101,DH101,DT101,DF 101 
EM102,DH102,DT102,DF 102 
EM103,DH103,D1103,DF 103 
EM104,DH104,DT104,DF 104 
EM105,DH105,DT105,DF 105 
EM106,DH106,D1106,DF 106 
EM107,DH107,D1T107,DF 107 


£M110,DH110,D1110,DF 110 


SEQ 0028 


Ne 
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ERROR POINTER TABLE SEQ 0029 


ITEM 111 
902542 053141 064504 071520 . 
002550 067550 


WORD €M111,DH111,DT111,DF111 


s ITEM 112 
002552 053141 065354 071520 SWORD EM112,DH112,D1112, DF 112 
002560 067550 — 
002562 053243 064504 071520 ° “WORD EM113,DH113,DT113,DF113 
002570 067550 seals he 
002572 053243 065354 071520 ° .WORD —M114,DH114,DT114,DF 114 
002600 067550 sais ul 
002602 053141 065573 071520 ° “WORD €M115,DH115,DT115,DF115 
002610 067550 sae te 
002612 053243 065573 071520 ~ “WORD £M116,DH116,D1116,DF116 
002620 067550 contin 
002622 053345 063774 067764 ~ .WORD  £M117,DH117,DT117,DF117 
002630 066665 Sesh ie 
002632 053501 066057 067764 ~ .WORD £&M120,DH120,DT120,DF 120 
vs : ITEM 121 
002642 053635 063654 071244 ~ .WORD £M121,DH121,DT121,DF121 
002650 067404 eee 
002652 053754 065104 070650 ~ “WORD EM122,DH122,D1122,DF 122 
002660 067421 Gia oom 
002662 054053 065104 071276 ° .WORD £M123,DH123,D1123,DF 123 
002670 067445 

ZITEM 124 
002672 054114 063774 071532 -WORD EM124,DH124,DT124,DF 124 
002700 067554 co aie 
002702 054207 063774 071532 ~ “WORD  EM125,DH125,DT125,DF 125 
002710 067554 

s ITEM 126 
002712 054277 063654 071520 -WORD EM126,DH126,D1126, DF 126 
002720 06/7550 i ca 
002722 054506 065156 071520 ° ‘WORD EM127.DH127.DT127.DF 127 
002730 067550 cemeee 
002732 054721 066057 067764 ~ “WORD €M130,DH130,D1130,DF 130 
ible: . ITEM 131 
002742 055021 065156 971616 ~ .WORD £M131,DH131,D1131,DF 131 
002750 067605 oes 
002752 055061 065156 071616 ~ -WORD £€M132,DH132,D1132,DF 132 
002760 067605 ees van 
002762 055121 066147 071660 ~ .WORD £M133,DH133,D1133,DF 133 


002770 067625 





NI 





CKFPAAO FP11F FLTG PNT 
ERROR POINTER TABLE 


002772 
003000 


003002 
003010 


003012 
003020 


003022 
003030 


003032 
003040 


003042 
003050 
003052 
003060 
003062 
003070 
003072 
003100 


003102 
003110 


903112 
003120 


003122 
003130 


003132 
003140 


003142 
003150 


003152 
003160 
003162 
093170 


003172 
003200 


003202 
003210 


003212 
003220 





055160 
067625 


055217 
067625 


055256 
067625 


055121 
067651 


055160 
067651 


055217 
067651 


055256 
067651 


055315 
067625 


055350 
067625 


055315 
067651 


055350 
067651 


055403 
067625 


055403 
067625 


055403 
067651 


055435 
067625 


055435 
067651 


055467 
067661 


055721 
067661 


056154 
067625 


PRT A 


066147 


066147 


066147 


066257 


066257 


066257 


066257 


066147 


066147 


066257 


066257 


065156 


066447 


066257 


066147 


066257 


066540 


066540 


065156 
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071660 


071660 


071660 


071732 


071732 


071732 


071732 


071660 


071660 


071732 


071732 


071660 


071660 


071732 


071660 


071732 


071752 


071752 


071660 


s ITEM 


; ITEM 


; ITEM 


ITEM 


ZITEM 


ITEM 


ZITEM 


ZITEM 


7 ITEM 


7 ITEM 


: ITEM 


s ITEM 


Z ITEM 


7; ITEM 


: ITEM 


ITEM 


Z ITEM 


sITEM 


Z ITEM 
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134 
. WORD 


EM134,DH134,D1134,DF 134. 


EM135,DH135,D1135,DF 135 
EM136,DH136,DT136,DF 136 
EM137,DH157,D1137,DF 137 
EM140,DH140,DT140,DF 140 
EMi141,DH141,DT141,DF 141 
EM142,DH142,D1142,DF 142 
EM143,DH143,D1143,DF 143 
EM144,DH144,D71144,DF 144 
EM145_0H145,DI145,DF 145 
EM146,DH146,D1T146,DF 146 
EM147,DH147,D1147,DF 147 
EM150,DH150,DT150,DF 150 
EM151,DH151,DT151,DF 151 
EM152,DH152,DT152,DF152 
EM153,DH153,D1153,DF153 
EM154,DH154,D1T154,DF 154 
EM155,DH155,DT155,DF155 


EM156,DH156,D1156,DF 156 


SEQ 0030 


CKFPAAO FPIIF FLTG PNT 
ERROR POINTER TABLE 


003222 
003230 


003232 
003240 


003242 
003250 


003252 
003260 


003262 
003270 


003272 
003300 


003302 
003310 


003312 
003320 067625 


003322 057556 
003330 067625 


003332 060015 
003340 067665 


003342 060125 
003350 067665 
003352 060364 
003360 067625 


060623 
067625 


061062 
067665 


061321 
067665 


061560 
067625 


061715 
067625 


062052 
067625 


062207 
067625 


056371 
067625 


056610 
067625 


057015 
067665 


057222 
067625 


057267 
067665 


057334 
066665 
057401 
066665 


057446 


003362 
003370 


003372 
003400 


003402 
003410 


003412 
003420 


003422 
003430 


003432 
003440 


003442 
003450 
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065156 


065156 


065156 


065156 


065156 


063774 


063774 


065156 


065156 


065156 


065156 


065156 


065156 


065156 


065156 


065156 


065156 


065156 


065156 
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071660 


071660 


071660 


071660 


071660 


067764 


067764 


071660 


071660 


071660 


071660 


071660 


071660 


071660 


071660 


071660 


071660 


071660 


071660 


7 ITEM 


s ITEM 


: ITEM 


s ITEM 


;1TEM 


7 1TEM 


ZI1TEM 


;1TEM 


7 ITEM 


ZITEM 


Z ITEM 


ZITEM 


;1TEM 


s ITEM 


7; ITEM 


ZITEM 


ZITEM 


7 1TEM 


: ITEM 


157 
. WORD 


. 2 
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EM157,DH157,D1157,DF 157 
EM160,DH16),DT160,DF 1460 
EM161,DH161,D1161 ,DF 161 
EM162,DH162,D1162,DF 162 
EM163,DH163,D1163,DF 163 
EM164,DH164 D1 164 ,DF 164 
EM165 ,DH165,DT165 DF 165 
EM166,DH166,D1166,DF 166 
EM167,DH167,D1167,DF 167 
EM170,DH170,D1170,DF 170 
EM171,DH171,DT171,DF 171 
£M172,DH172,D1172,0F 172 
EM173,DH173,D1173,DF 173 
EM174,DH174,D1174,DF174 
EM175,DH175,DT175,DF175 
EM176,DH176,D1176,DF 176 
EM177,DH177,D1177,DF177 
EM200 ,DH200 .DT200 DF 200 


EM201,DH201 ,DT201 DF 201 


SEQ 0031 


Ck 
T4 
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ERROR POINTER TABLE SEQ 0032 
s ITEM 202 
003452 062344 065156 071660 SWORD  EM202,DH202,D1202,, DF 202 
093460 067625 es aaa 
003462 062501 065156 071660 © ~ “WORD £M203,DH293,DT203,DF 203 
003470 067625 ies Se 
0034672 062636 065156 071660 © -WORD £M204,DH204,D1204,DF 204 
003500 067625 cea tae 
003502 062773 063774 067764 ~ “WORD E&M205,DH205,D1205.DF 205 
003510 066665 
Z ITEM 206 
003512 063040 065156 071660 “WORD £M206,DH206,DT206. DF 206 
003520 067625 
: ITEM 207 
003522 063105 065156 071660 -WORD €M207,DH207,D1207,DF 207 
003530 067625 mye 
003532 063227 065156 071660 ~ “WORD EM210,DH210,DT210,DF210 
003540 067625 vane 
: i 
003542 043267 066600 071764 ,WORD EM211,DH211,D7271,DF 2171 
003550 067711 ees 
003552 043323 063654 072002 ~ SWORD €M212,DH212,DT212,DF 212 
003560 067711 
s ITEM 213 
003562 043355 063654 072002 “WORD  EM213,DH213,D1213,DF213 
003570 067711 
1133 
1134 
1139 .SBTTL ACT11 HOOKS 
CFR AAAARAAARAEERAEKAEREARAARRRERRARARAERARARRAARAREARRARARAAHRERRAARRD 
HOOKS REQUIRED BY ACT11 
003572 $SVPC=. :SAVE PC 
000046 .=46 
000046 054754 SENDAD ::1)SET LOC.46 TO ADDRESS OF $ENDAD IN .$EOP 
000052 000000 "WORD 0 ::2)SET LOC.52 TO ZERO 
00357 .=$SVPC +: RESTORE PC 
1136 .SBITL APT PARAMETER BLOCK 


WERERERAAASASLAAALALASASSESARSASESAS ARS ARERR ERR RAR RRR SRR RRR ARRAS RSE DS BI 


*SET LOCATIONS 24 AND 44 AS REQUIRED FOR APT 


LDR RAAEAEAARREERAEAEERARAREREEREERAKEAEERAAAERAERARAE ARERR RAE ES 


003572 -$X=. ;;SAVE CURRENT LOCATION 

000024 2=24 :2SET POWER An TO POINT TO START OF PROGRAM 
000024 000200 200 73 FOR APT START UP 

900044 44 sPOINT TO APT INDIRECT ADDRESS PNTR. 
000044 003572 SAPTHDR : POINT TO APT HEADER BLOCK 

003572 =. 8X RESET LOCATION COUNTER 


jposeaninnwaauesnvesresioabenannerennenteneinsaesesnennananetes 


SETUP APT PARAMETER BLOCK AS DEFINED IN THE APi-PDP11 DIAGNOSTIC 
j INTERFACE PEC. 


003572 000000 $HIBTS: .WwORD QO 3: 7WO HIGH BITS OF 18 BIT MAILBOX ADDR. 
003574 001310 SMBADR: .WwORD $MAIL ADDRESS OF APT MAILBOX (BITS 0-15) 








































003576 
903600 
003602 
00 3604 


CKFPAAO FPIIF FLTG PNT 
APT PARAMETER BLOCK 


112767 


012737 


00 
012767 
012767 


013746 


000002 
012767 
012767 





PRT A 


001700 
001140 
001100 
035034 
000340 
035314 
000340 
037332 
000340 
037416 
000340 
030664 
175362 
175360 
000001 


035020 
000340 
000002 


177570 
177777 


004102 


000176 
000174 


H 3 
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000026 
030654 


175163 


000010 


031020 


000010 


$TSTM: .WORD 10 3;RUN TIM OF LONGEST TEST 

$PASTM: .WORD 40 : :RUN TIME IN SECS. OF 1ST PASS ON 1 UNI 

SUNITM: .WORD QO DITIONAL RUN TIME (SECS) OF A PASS F 
. WORD SETEND~SMAIL/2 7 LENGTH MAILBOX~E TABLE (WORDS) 


START: 
-SBTTL INITIALIZE THE COMMON TAGS 
:; CLEAR THE COMMON TAGS ($CMTAG) AREA 
MOV #SCMTAG,RG zzFIRST LOCATION TO BE CLEARED 


CLR (R6)+ 3zCLEAR MEMORY LOCATION 
CMP A#SWR RO — 
at ae, ;LOOP BACK IF NO 

TACK, SP :SETUP THE STACK POINTER 


aS 
ss INITIALIZE A FEW VECTORS 


#$SCOPE , A IOTVEC At! VECTOR FOR SCOPE ROUTINE 
MOV pron t ar iOTvec+2 ssLEVEL 7 
MOV #SERROR , AAEMTVEC emt VECTOR FOR ERROR ROUTINE 
MOV #340, a#EMTVEC+2 > sLEVE L 7 
MOV WSTRAP ,Q@MTRAPVEC :; TRAP VECTOR FOR TRAP CALLS 
MOV #340, a#TRAPVEC+2;LEVEL 7 
MOV #SPWRDN, @APWRVEC ; ;POWER FAILURE VECTOR 
MOV #340, a#PWRVEC+2 ::LEVEL 7 
MOV SENDCT,SEOPCT | ::SETUP END-OF-PROGRAM COUNTER 
CLR S$TIMES ae ty TIALIZE NUMBER OF ITERATIONS 
CLR SESCAPE :CLEAR THE ESCAPE ON ERROR ADDRESS 
MOVB #1, SERMAX ALLOW ONE ERROR PER TEST 
sINITIALIZE THE ‘“T-BIT'' TRAP VECTOR. THEN LOAD LOCATION *‘S$RTRN’', IN 
: THE *'END-OF-PASS'' (SEOP) ROUTINE, WITH A ‘RTI** OR ‘RIT 
MOV #SRIRN, AATBITVEC :iSET "'T'* BIT VECTOR 0 $RTRN 
MOV #340,QHTBITVEC+2 ::LEVEL 7 
MOV #RTI,SRTRN SET SRTRN TO A RTI 
MOV ee @ARESVEC =;;TRY TO DO A RIT 
CLR > t PS 
MOV rons, -(SP) AND PC 
RTT STRY THE RTT 
64$: a es SIRTT IS LEGAL--SET $RTRN TO A RTT 
65$: ADD #10,S T ILLEGAL=-CLEAN OFF THE STACK 
66$: MOV ARESVEC#2, amesvét. 1 :RESTORE TRAP CATCHER 
CLR $TBIT CLEAR ‘*'T’' BIT SWITCH 
MOV #.,$LPADR INITIALIZE THE LOOP ADDRESS FOR SCOPE 
MOV #.,$LPERR SETUP THE ERROR LOOP ADDRESS 
:SIZE FOR A HARDWARE + pis REGISTER. IF NOT FOUND OR IT IS 
[EQUAL TO A ''=1'', SETUP FOR A SOFTWARE SWITCH REGISTER. 
MOV @VERRVEC,-(SP) ;;SAVE ERROR VECTOR 
MOV #67$,aHERRVEC ::SET UP ERROR VECTOR 
MOV #DSWR, SWR 44 Sa FOR A HARDWARE SWICH REGISTER 
MOV #DDISP DISPLAY ow HARDWARE DISPLAY REGISTER 
CMP #-1,aSWR TRY TO REFERENCE HARDWARE SwWR 
BNE 69$ BRANCH IF NO TIMEOUT TRAP OCCURRED 
[TAND THE HARDWARE SWR iS NOT = -1 
BR 68$ : or IF NO TIMEOUT 
67$: a 2 #68$, (SP) ;SET UP FOR TRAP RETURN 
638$: MOV #SWREG, SWR 3zPOINT TO SOFTWARE SwWR 
#D1SPREG, DISPLAY 






’ (QUICK VERIFY) 
OR EACH ADDITIONAL UNIT 


CKFPAAO FP11F FLTG PNT PRT A 
COMMON 


INITIALIZE THE 


004110 
004122 
004126 
004134 


RE 
RS 


012637 
005067 


0004 
112767 
000420 


TAGS 


000004 
175176 
090200 


001340 


177777 
034754 
004230 
000042 
175136 
174730 


000001 
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175203 
174774 


000001 
000176 


174706 





69$: (SP) +, @#ERRVEC sist Hoy: ERROR VECTOR 
SPASS ;CLEAR PASS COUNT 
MAPTSIZE,SENVM ii TEST USER SIZE UNDER APT 
70$ ;;YES,USE NON-APT SWITCH 
708 ASSWREG, SWR INO. USE APT SWITCH REGISTER 
-SBTTL TYPE PROGRAM NAME 
33 TYPE — =) PROGRAM sintt PASS 
N 


71$ 
AMSENDAD , 0442 
71$ 


CH IF YES 
YPE .72$ TYPE ASCIZ STRING 
Ger VALUE FOR SOF TWARE sui TCH REGISTER 
TST a42 WE ra UNDER XXDP/ACT? 


73$ 
SENV 41 
73% H IF YES 

SWR ,ASWREG 23 SOF TWARE SWITCH REG SELECTED? 
74$ F NO 


ANCH | 
S:GET SOFT-SWR SETTINGS 


BR 74$ 
73$: #1,$AUTOB 3:SET AUTO-MODE INDICATOR 


74%: 
BR 71$ ;GET OVER THE ASCIZ 
oor eASCIZ <CRLF>*CKFFAAO EPI FLTG PNT PRT A®<CRLF> 


LOOP: 


Witte eee eee SeSEREERRARASASEARRRR ESAS SERA RASA RARER RRR RR ARAS RARE SS 


oe 


i*TEST 1 LDFPS, STFPS AND DATA PATHS TEST 


:*THIS IS A TEST OF THE LDFPS (LOAD FLOATING POINT STATUS) AND STFPS 
; ( ONS. A COUNT PATTERN IS GENERATED 


;*AND RUN T 

:*THIS WILL TEST THE 16-BIT TRI STATE BUS WHICH CONNECTS THE CPU 
us eae THE A of AND ALSO RUNS INTERNALLY WITHIN THE FPP. ONLY DMO AND 
2 

; *NOTE THAT A MASK MUST BE USED BECAUSE SOME OF THE FPS BITS CANNOT 


; *BE SET. 


‘ SONLY THE FIRST FIVE ERRORS WILL BE REPORTED INDIVIDUALLY. 
;*THIS IS TO PREVENT LOCKING OUT THE COMPLETION OF THE TEST BECAUSE 
;*OF VIRTUALLY ENDLESS NUMBER OF ERRORS. ONLY FIVE INDIVIDUAL ERRORS 
;*WILL BE REPORTED THEN THE TEST WILL BE COMPLETED AND AN ERROR 
: *SUPPARY GIVEN (SEE NOTE BELOW. 


“ #NOTE THAT THIS TEST KEEPS A DYNAMIC RECORD OF THE LOGICAL ‘AND’ AND ‘OR’ 
;*OF THE FAILING DATA PATTERNS. THESE CAN BE VERY USEFUL IN DETERMINING 
>*STUCK BITS. IF THE USER HAS THE INHIBIT FRROR TYPE OUT SWITCH (SWR13) 
;*OFF, THEN THE USER WILL RECIEVE EACH INDIVIDUAL ERROR MESSAGE PLUS 

;*AN ERROR SUMMARY AT THE END OF THE TEST. INHIBITING ERROR PRINT OUT 
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11 LDFPS, STFPS AND DATA PATHS TEST SEQ 0035 


:*WILL INHIBIT ERROR SUMMARY PRINT OUT, EXCEPT IN THE a | DESCRIBED BELOW. 
:*TO GET JUST THE ERROR SUMMARY WITH NO INDIVIDUAL ERROR REPORTS, 
:*SET SWITCH REGISTER BIT?3 AND SWITCH REGISTER BIT? BOTH ON. 


. 
fs TARAS SARSARAAASLASASLSSRSASRARSARASAR SRR RASA RS RARE RRA R SRR RAR ASS SD | 


004270 000004 TST1: | SCOPE 
1167 004272 005037 004544 CLR QAAERFLG 
1168 006276 104413 LPERR :SET UP THE LOOP GN ERROR ADDRESS. 
1169 004300 012700 177777 MOV #-1,RO : INITIALIZE THE COUNT PATTERN. 
1170 004304 012737 004546 000244 MOV MAERR1, @AFPVECT ‘SET UP FOR UNABLE TO DECODE 
1171 004312 012737 004560 000010 MOV HAERR2.a410 ‘FPP INSTRUCTION TRAP TO 244 OR 10. 
1172 004320 005002 CLR R2 tR2 IS THE ‘AND’ OF BAD DATA. 
1173 004322 005102 COM R2 
1174 004324 005003 CLR R3 :R3 IS THE "OR" OF BAD DATA. 
1175 004326 012737 004612 000004 MOV #AERR3, AAERRVECT ‘IF EITHER INSTRUCTION 
1176 ‘FAILS TO GO THROUGH THE 
1177 [CORRECT SRC OR DST MODE AN 
1178 ‘ODD ADDRESS TRAP WIL! OCCUR. 
1179 004334 Al: 
1180 004334 010004 All: MOV RO,R4 
1181 004336 042704 030020 BIC #30020,R4 
1182 004342 170104 LDFPS RG : TEST INSTRUCTION. 

! 
1184 004344 012701 177777 MOV #-1,R1 
1185 006350 170201 Al2: STFPS 1 : TEST INSTRUCTION. 
1186 004352 012737 040234 000244 MOV #FPSPUR, dAFPVECT ;SET UP FOR UNEXPECTED TRAPS. 
1187 004360 010004 MOV RO,R4 [MASK OFF UNSETTABLE BITS. 
1188 004362 042704 030020 BIC #30020,R4 
1189 004366 012737 040266 000004 MOV #CPSPUR, AAERRVECT 
1190 004374 012737 040304 000010 MOV #CPTWO,a4#10 
1191 004402 020401 CMP R4,R1 : COMPARE DATA EXPECTED WITH 
1192 ; THE DATA READ. 
1193 004404 001002 BNE A3 ‘IF NOT EQUAL GO REPORT ERROR. 
1195 004406 077026 Ad: SOB RO,Al ZOTHERWISE DECREMENT COUNT PATTERN 
1196 004410 000425 BR AS ‘UNTIL IT IS ZERO. 
1198 004412 005237 004544 A3: INC QHAERFLG :RECORD ERROR. 
1199 004416 050003 BIS RO.R3 ‘COMPUTE 'OR' OF FAILING PATTERNS. 
1200 004420 010005 MOV RO.R5 “COMPUTE "AND' OF FAILING PATTERNS. 
1201 004422 005105 COM R5 
1202 004424 040502 BIC R5,R2 
1204 004426 022737 000005 004544 CMP #5, QHAERFLG :SEE IF MORE THAN 5 ERRORS HAVE 
1205 004434 103412 BLO A0s TOCCURRED. BR IF YES. 
1206 OTHERWISE 
1207 “REPORT ERROR. 
1208 004436 012737 004334 001236 MOV #A1, aASIMP2 
1209 004444 010037 001240 MOV RO, a#STMP3 
1210 004450 010137 001242 MOV R1.a4$TMP4 
1211 004454 010437 001244 MOV R4. aASTMPS 
1212 004460 104001 AG: ERROR +1 
1214 004462 000751 AOS: BR A2 : CONTINUE TESTING. 
1216 004464 005737 004544 AS: 1ST @HAERFLG :SEE IF ANY ERRORS OCCURRED. 
1217 006470 001471 BEQ ADONE ‘IF NOT GO TO NEXT TEST. 


am 
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T1 LDFPS, STFPS AND DATA PATHS TEST SEQ 0036 
1218 004472 032777 020000 174440 BIT #SW13,aSWR OTHERWISE SEE IF A SUMMARY 
1219 004500 0014 BEQ A6 SHOULD BE TYPED. 

1220 004502 032777 000200 174430 BIT #SW7,aSWR 
\s$) 004510 001461 BEQ ADONE 
1223 004512 A6: ; TYPE ERROR SUMMARY. 
1224 004512 010237 001236 MOV R2,a4STMP2 
1225 004516 010337 001240 MOV R3,a4$STMP3 
1226 004522 12737 6 001116 MOV #A7 , AASERRPC 
1227 004530 .2737 000002 001114 MOVB #2,04$1TEMB 
1228 004536 004737 037602 A7: JSR PC, a#ERTYPE 
fs 004542 000444 BR ADONE 
13) 004544 000000 AERFLG: .WORD 0 
1233 :UNABLE TO DECODE FPP INSTRUCTION. TRAPPED TO 244. 
1234 004546 011637 001236 AERR1: MOV (SP) ,a#STMP2 SAVE PC OF TRAP. 
1235 004552 022626 CMP (SP)+,(SP)+ © 
1236 004554 104010 1$: ERROR +10 
f+ 004556 000436 BR ADONE 
1239 UNABLE TO DECODE INSTRUCTION. TRAPPED TO 10. 
1240 004560 021627 004336 AERR2: CMP (SP) ,4A11+2 :DID TRAP OCCUR OF FPP INSTRUCTION? 
1241 004564 001405 BEQ 1 
1242 566 021627 004352 CMP (SP) ,#A12+2 
1243 004572 001402 BEQ 1$ 
1244 004574 000137 040304 JMP aecPTWwO IF NOT FPP INSTRUCTION THEN 
ee REPORT SPURIOUS TRAP TO 10. 
1247 004600 011637 001236 1$: MOV (SP) ,aA#STMP2 OTHERWISE REPORT IR DECIDE ERROR. 
1248 004604 022626 CMP (SP) +, (SP) + 
1249 004606 104011 2$: ERROR +11 
ise 004610 000421 BR ADONE 
1252 TRAP TO 4 HANDLER: 
1253 004612 021627 004336 AERR3: CMP (SP) ,4A11+2 DID THE TRAP OCCUR ON THE 
1254 004616 001405 BEQ 1$ LDFPS INSTRUCTION? 
1255 004620 021627 004352 CMP (SP) ,A#A12+2 OR THE STFPS INSTRUCTION? 
1256 004624 001407 BEQ 2$ 
1257 004626 000137 046266 JMP a4 CPSPUR IF NEITHER THEN REPORT 
ise UNEXPECTED TRAP TO 4. 
1260 004632 011637 001236 1$: MOV (SP) ,aASTMP2 
1261 004636 022626 CMP (SP)+, (SP) + 
1262 004640 104014 15$: ERROR +14 
1863 004642 000404 BR ADONE 
1265 004644 011637 001236 2$: MOV (SP) ,aA#$STMP2 
1266 004650 022626 CMP (SP) +, (SP) + 
ie? 004652 104015 25$: ERROR +15 
1269 004654 ; ADONE : 
004654 104412 RSETUP :GQ INITIALIZE THE FPS AND STACK; AND 


SEE IF THE USER HAS EXPRESSED 

THE DESIRE TO CHANGE THE SOF TWARE 
;VIRTUAL CONSOLE SWITCH REGISTER (HAS 
7; THE USER TYPED CONTROL G?). 


am 


L 3 
CKFPAAO FP11F FLTG PNT PRT A MACRO_M1111 26=SEP=79 09:38 PAGE 9-12 
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TI DFPS, STFPS AND DATA PATHS TEST SEQ 0037 

1270 

1271 

1277 DOO IUISIIOIUISIOIOIIOISIOIUIDIIISIDIOIIIUIDIOUIUIDIDIUIOIOIUIUIUIDIOIUOIDIOIUIDIOIUIIDIDINIUIDIDI IDOE 
;*TEST 2 CFCC TEST 
:*THIS IS A TEST OF THE COPY CONDITION CODES INSTRUCTION, CFCC. 
eee e tee t iti t iit itiiiitiiiiiti iii iii tii iti irri titi ir 

004656 000004 TST2: SCOPE 

1278 004660 104413 LPERR ;SET UP THE LOOP ON ERROR ADDRESS. 

1San 004662 012700 000017 MOV #17,R0 7RO CONTAINS TO TEST PATTERN. 

1281 004666 Bi: 

iss 004666 170iuU0 LDFPS RO ;LOAD THE TEST PATTERN 

1284 004670 Be: 

ice 004670 170000 . CFCC :COPY CONDITION CODES. 

1287 004672 013703 177776 MOV @APSW,R3 7SEE IF PATTERN TRANSFERED. 

1288 004676 042703 177760 BIC #177749,R3 

1289 004702 920003 CMP RO,R3 

if 004704 001002 BNE BERR 

1292 004706 077011 B3: SOB RO,B1 

534, 004710 000422 BR BDONE 

1295 004712 BERR: 

1296 004712 170201 STFPS zWAS FPS MODIFIED BY CFCC? 


R1 
1297 004714 012737 004670 001236 MOV AB2 , AASTMP2 


—o_- 


CKFPAAO FP11F FLTG PNT PRT A 
T2 CFCC TEST 


1299 
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SEQ 0038 


an 


CKFPAAO FP11F FLTG PNT 
T2 TEST 


CFCC 


ase 
8 


740 


SESSSR 


274+ +o 


332 005010 
33 005012 


3 
S 
S 
N 


0 
1 005032 


¥ ¥¥¥R 
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005056 


020001 
001006 


010337 
010037 


170100 
012737 
170001 
170201 


170201 


PRT A 


001240 
001242 


000760 


005020 


005416 


147757 


005054 


N 
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RO,R1 
BERR1 


R3,a4$TMP3 
oe, 
+ 


B3 


RO, a#$TMP3 
pap 
+ 


B3 


3 


SEQ 0039 


;GO_ INITIALIZE THE FPS AND STACK; AND 
;SEE IF THE USER HAS EXPRESSED 

; THE DESIRE TO CHANGE THE SOF TWARE 
[VIRTUAL CONSOLE SWITCH — (HAS 
; THE USER TYPED CONTROL G?) 


WEAR AAREASSSEALARSLELASARSRASALALE SALES AA ESSER RAS ARRAS ALAS RASS S| 


MACRO M1111 
CMP 
BNE 
MOV 
MOV 
1$: ERROR 
BR 
BERR1: 
MOV 
MOV 
1$: ERROR 
BDONE : 
RSETUP 
:#TEST 3 


SETF, 


THIS IS A_ TEST OF THE SETF, 
:*EACH INSTRUCTION IS EXECUTED WITH THE FPS CONTAINING 

:*ALL ONES AND ALSO WITH THE FPS CLEAR. THE RESULT OF EACH 
;* SITUATION IS CHECKED. 


SETD, SETI AND SETL TEST 


SETD, SETI AND SETL INSTRUCTIONS. 


MASSA ALALALASALALASALASALSAAASLASESARASSRA SAR RAR SAA SSS ARR SA SASS S| 


:* 
1813: 


001244 
001250 (C1: 
001252 


001236 


c1S¢ 


1$: 
C2: 


001236 


C25: 


#760, a4STMPS 
#202, a4STMP7 


AMSETF1,a4$TMP10 


RO 

RO 

#015, a4$TMP2 
R1 

R2 

R2,R1 

1$ 

PC ,@ACERR1 
#147757,R0 
RO 
#C25,a4STMP2 


R1 


;SET UP THE LOOP ON ERROR ADDRESS. 


;CLEAR THE FPS. 


TEST INSTRUCTION. 
GET RESULT. 
7DID AN ERROR OCCUR? 


SET UP THE LOOP ON ERROR ADDRESS. 


PUT 147757 IS FPS 
:CLEAR FD BIT. 
GET RESULT 





—_ 


C 
T 


K 
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SETF, 


147557 


005514 


ee 
WANA 
Wie wi 


Pn 
. 
oO 


1 
0 goeet? 
005104 0127 $03 414 
5112 012700 147757 
170100 
0 
1 


WWW 
Ww 
oon 


737 005126 


147757 


SESERESES 


& 


005514 


Nw 


104413 


005060 
170100 
012737 


170011 
170201 


wn "ovo 
S 
a 
a 
o 


NNN 
a 


005162 


WANWANWAAS WW 
NNN 
OnNaAM 
w 
—s 
w 


3a 
S 
$ 


000200 


005416 


ee es “a = 2 as SS SS — ee a es SS os ss ss I SS HS 


SERES 
S 
e 


$ 


000204 
941422 


gees 
z 8 
wy 
mM oo 


170100 
012737 


170002 
170201 


8 
5 
x 


005232 


ee ak a td 3 os ss 


WAAAAG 
RFRASS 
888 

Mw 

Ne 


0 

1397 005242 

1398 005244 
1399 

1400 005250 
905250 

1401 005252 012700 


1402 005256 
1403 005260 012737 


005416 


147757 
005266 


MACRO M1111 


SETD, SETI AND SETL TEST 


1$: 


007250 (3: 
001252 


001236 


C35: 


1$: 
C4: 
001236 


C45: 


001236 


c$5: 


1$: 
C6: 
001236 
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MOV #147557 ,R2 
CMP R1,R2 


1$ 
JSR PC ,@#CERR2 


MOV #203, a4$TMP7 


MOV #SETD1, a#$TMP10 


MOV #147757,RO 


LDFPS RO 

MOV #C35,a4$TMP2 
SETD 

STFPS RI 

MOV #147757 ,R2 
CMP R1,R2 

BEQ 1$ 

JSR PC ,@#CERR2 
LPERR 

CLR RO 


RO 
MOV 4.45, Q4$TMP2 


Q1 
MOV #200,R2 
CMP R1,R2 


1 
JSR PC ,@4CERR1 


MOV #204, a#STMP7 


RO 
MOV #C55,a4$TMP2 


STFPS -t! 
CLR 

CMP RS, R1 
BEQ 1$ 


JSR PC ,@4CERR1 


MOV errer ae 
MOV #(65,a4$TMP2 


MOV A#SETI1, a4$1TMP10 
RO 


SEQ 0040 


RESULT CORRECT. 


SET UP THE LOOP ON ERROR ADDRESS. 


;LOAD 147757 INTO FPS. 
;SETD FD BIT. 


RESULT CORRECT? 


:SET UP THE LOOP ON ERROR ADDRESS. 


;CLEAR FPS. 


;SET FD BIT. 
:GET RESULT. 
RESULT CORRECT? 


;SET UP THE LOOP ON ERROR ADDRESS. 


ZCLEAR FPS 


CLEAR FL BIT. 
GET RESULT. 
RESULT CORRECT? 


;SET UP THE LOOP ON ERROR ADDRESS. 


PUT 147757 INTO FPS 





Ck 


C 4 
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Ck 
SETF, SETD, SETI AND SETL TEST T? 
1404 
1405 005266 170002 (65: SETI ZCLEAR FL BIT. 
1407 005270 170201 STFPS RI :GET THE RESULT. 
1408 005272 012702 147657 MOV #147657,R2 
1409 005276 020102 CMP R1,R2 sRESULT CORRECT? 
1410 005300 007402 BEQ 1$ 
161) 005302 004737 005514 JSR PC, @#CERR2 
1413 005306 1$: 
005306 104413 LPERR :SET UP TYE LOOP ON ERROR ADDRESS. 
1414 005310 012737 000205 001250 (7: MOV #205, a#$TMP7 
1415 005316 012737 041430 091252 MOV ASETL1,a4$1MP10 
1416 005324 012700 147757 MOV #147757,RO 
1417 005330 170100 LDFPS RO :SET FPS TO 147757. 
1418 005332 012737 005340 001236 MOV C75, @ASTMP2 
1420 005340 170012 C75: SETL :SET FL BIT. 
1422 005342 170201 STFPS RI GET THE RESULT. 
1423 005344 012702 147757 MOV #147757,R2 
1424 005350 020102 CMP R1,R2 :RESULT CORRECT? 
1425 005352 001492 BEQ 1$ 
1426 005354 004737 005514 JSR PC, a#CERR2 
1428 005360 1$: 
005360 104413 LPERR :SET UP THE LOOP ON ERROR ADDRESS. 
1429 005362 005000 C8: CLR RO 
1430 005364 170100 LDFPS RO ZCLEAR FPS. 
1431 005366 012737 005374 00:236 MOV #(85, a#STMP2 
1433 005374 170012 C85: SETL :SET FL BIT. 
1435 005376 170201 STFPS R1 
1436 005400 012702 000100 MOV #100,R2 
1437 005404 020102 CMP R1,R2 :RESULT CORRECT. 
1438 005406 001402 BEQ 1$ 
1659 005410 004737 005416 JSR PC ,a#CERR1 
lool 005414 000522 1$: BR CDONE 
1443 ; THESE ARE ERROR ANALYSIS ROUTINES: 
1444 005416 010103 CERR1: MOV R1 
1445 005420 032703 177477 BIT R807, R3 :ARE ANY OTHER BITS SET? 
1446 005424 001401 BEQ 2$ 
1667 005426 000503 1$: BR CERRS 
1449 005430 022703 000300 23: CMP #300,R3 ZARE BOTH FD AND FL SET? 
1450 005434 001774 BEQ 1 
1451 005436 032703 000300 BIT #300,R3 ZARE THEY BOTH CLEAR? 
1458 005442 001771 BEQ 1$ 
1454 005444 032703 000200 BIT #200,R3 :1S FD SET? 
1455 005450 001407 BEO 3$ 
1456 005452 012737 041414 001254 MOV #SETD1,aa$7MP11 
1457 005460 012737 000203 001246 MOV #203, a#$TMP6 


1458 005466 000452 BR CERRS 








ren FPI1F FLTG PNT “gg § A 
13 SETD, SETI AND 


SETF, 


1459 
1460 005470 


1464 005512 
1465 

1466 005514 
1467 005516 
1468 

1469 005520 
1470 005524 
1471 005526 
1472 

1473 005530 
1476 005542 


1477 
1478 005544 


483 
1484 005570 
1485 005574 
1486 005576 
1487 005604 
1488 005612 
1489 
1490 
1491 005614 


1496 005632 
1497 
1498 005636 


1503 005654 

1504 

1505 005660 

1506 

1507 005662 
005662 


010103 
005103 


032703 
001401 
000443 


032703 


032701 
001007 
012737 
012737 
000412 


032701 


000100 


041430 
000205 


177477 


000300 
000300 


000200 
041406 
000202 
000100 


041422 
000204 


001240 
001242 
005660 


000022 


001240 


MACRO M1111 
SETL TEST 


001254 
001246 


001254 
001246 


001254 
001246 


3$: | aaa 
#SETL1,a#$7MP11 
#205, ,a4STMP6 
CERR3 
R1,R3 
R3 


#177477 ,R3 
2s 

CERR4 

#300 ,R3 

1$ 

#300,R1 

1$ 


#200,R1 
3$ 


MSETF1,@4$1TMP11 
aoe a4$TMP6 


CERR3 
#100,R1 
1$ 


#SETI1,a4$TMP11 
#204, AAS TMP 
CERR3 


;REPORT THE ERRORS: 


CERR3: 
R1,a4STMP3 
R2,a4STMP4 
(SP) +, a4CPC 
+12 


acPC 


R1,a4$TMP5 
R2,a4$TMP4S 
(SP) +, a@4CPC 
+13 


acPc 


D 4 
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1S FL SET 


ARE ANY OTHER BITS SET? 


;ARE BOTH FD AND FL SET? 
ARE THEY BOTH CLEAR? 


71S FD CLEAR? 


31S FL CLEAR. 


:GO_ INITIALIZE THE ©PS AND STACK; AND 
;SEE IF THE USER HAS EXPRESSED 

7; THE DESIRE TO CHANGE THE SOFTWARE 
[VIRTUAL CONSOLE SWITCH ll (HAS 
; THE USER TYPED CONTROL G?) 


BAAD ERR RERRRRSASSRSRASRR RRR RRR RRR RRR RRR RR RR RRR RRR RR RA SARE SS S| 








CK 
‘7? 


E 4 
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14 ILLEGAL FPP OP CODES AND STST TEST SEQ 0043 
SeTEST 4 ILLEGAL FPP OP CODES AND STST TEST 
* 
‘*THIS IS A TEST OF THE FPP OPERATION CODES: 
:* 170003 
:* 170004 
i* 170010 
:* 170013 
7* 170014 
*% 


170077 
*THESE ARE ILLEGAL INSTRUCTIONS AND (WITH INTERRUPTS ENABLED) 
;*SHOULD CAUSE A_ TRAP TO 244. 

: sALSO TESTED HERE IS ot" toners 


STST 
WHICH SHOULD PUT THE FEC CODE 2 IN R1, AFTER ANY OF THE ABOVE 
:+0P CODES IS EXECUTED. 


Py 
WEARER ARERSALALASZLSEALSAARARRS SEAS R RRR ARSE SARA RS RRR RRR RRR RSD SSS DS 


005664 000004 TST4: SCOPE 
1530 005666 104413 LPERR SET UP THE LOOP ON ERROR ADDRESS. 
1531 005670 012705 170003 MOV #170003,R5 INITIAL OP CODE. 
1532 005674 012737 (006100 000004 MOV MDERR2,@#ERRVECT 
\2e7 005702 012737 006004 000244 MOV ADERR1 , @AFPVECT 
1535 005710 005000 D1: CLR RO 
1536 005712 170100 LDFPS RO CLEAR FPS. 
1537 005714 CLR Re 
1538 005716 010537 005734 MOV R5,a4D2 SET UP THE ILLEGAL INSTRUCTION. 
153$ 005722 070537 001244 MOV R5,@4$TMP5 
1540 005726 012737 005734 001236 MOV #D2,a4$TMP2 
1541 005734 000000 De: -WORD 0 
1542 005736 170000 D3: CFCC 
15435 005740 0052C2 INC R2 
Fo 005742 005202 D4: INC Re 
1546 005744 170201 STFPS RI REPORT FAILURE. DID NOT TRAP, 
1547 005746 010137 001240 MOV R1,a4$1TMP3 
py 005752 104016 1$: ERROR +16 
1550 005754 022705 170010 DS: CMP #170010,R5 ; COMPUTE NEXT OP CODE 
1551 005760 001003 BNE D6 
1552 005762 012705 170013 MOV #170013,R5 
1387 005766 000750 BR D1 
1555 005770 022705 170077 D6: CMP #170077,R5 
1556 005774 001001 BNE 07 
1557 005776 000452 BR DDONE 
1558 006000 005205 D7: INC R5 
4 006002 000742 BR D1 
1561 006004 022716 005736 DERR1: CMP #03, (SP) ;DID TRAP OCCUR ON TEST INSTRUCTION? 
1562 006010 001402 BEQ 1$ 
ieez 006012 000137 040234 JMP a4F PSPUR 
ta $4 006016 022626 1$: CMP (SP)+,(SP)+ 


66 006020 170201 STFPS RI GET THE FPS AND SEE IF IT IS 





—— 


KFPAAO FP11F FLTG PNT PRT A 
ILLEGAL FPP OP CODES AND STST TEST 


567 006022 


1 
1 
; 
1 
; 
1 
; 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
; 
1 
1 
1 
1 
1 
; 
; 
1 
1 
1 
1 
1 
1 
1 
1 


006126 
1610 006130 
+ af 006132 


1612 
1613 006140 


022701 
001406 


010437 


022716 
001402 
000137 


011637 


000004 
104413 
012737 


012700 
170100 
012737 


170020 


100000 


ooo 001240 


000002 


006050 
001242 


001240 


006052 
040266 


001236 


006234 000244 
040000 
006154 001236 


MACRO M1111 
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SEQ 0044 


CMP — SET CORRECTLY. 


BEQ 
MOV #100000, a&$TMPS 
MOV R1,@A$TMP4 
23: ERROR +7 
3$: MOV #1,R4 
D8: STST R4 ;GET THE FEC CODE. NOTE THAT 
;I1F THE DESTINATION MODE IS 
; IMPROPERLY DECODED AN ODD 
ZADDRESS TRAP TO 4 SHOULD OCCUR. 
CMP A2,R4 sWAS FEC CORRECT? 
BNE D9 
BR DS 
DS: ;REPORT STST FAILURE 
MOV #08, a4$TMP3 
MOV RS, aASTMPS 
1$ ERROR +20 
BR DS 
DERR2: CMP #D8+2, (SP) :DID THE TRAP CCCUR ON THE 
£Q D10 ;STST INSTRUCTION? 
JMP a4CPSPUR 
p10: 
MOV (SP) ,a@&#$TMP2 
CMP (SP)+, (SP)+ 
1$: ERROR +21 
BR DS 
DDONE : 
RSE TUP :GO INITIALIZE THE FPS AND STACK; AND 


;SEE IF THE USER HAS EXPRESSED 

THE DESIRE TO CHANGE THE SOF TWARE 

: VIRTUAL CONSOLE SWITCH —) egg (HAS 
; THE USER TYPED CONTROL G?) 


LAA RAE REAR EAR ERE EKREA ERE AREEEREEREREREERE RARER EH 


i*TEST 5 FID, INTERRUPT DISABLE, BIT TEST 
-* 


S*THIS IS A TEST OF FPS BIT 14 (FID) OR FLOATING INTERRUPT DISABLE. 
aa INSTRUCTION IS EXECUTED WITH FID=1. NO INTERRUPT SHOULD 
3* UR, 


°@ 


. 
CEE ARAAAAAAEAEEEAEKEAAHRAEAHERERARARAARAAARRARARAAEAARAARAARARAERAAH DS 4 


TSTS: SCOPE 
LPERR :SET UP THE LOOP ON ERROR ADDRESS. 
MOV’ MEERR2, a#F PVECT :SETUP FOR THE INTERRUPT. 
E1: MOV #40000,RO 
LDFPS R :SET FID. 
. MOV #E 3, aASTMP2 
F3: .WORD 170020 ZILLEGAL FPP INSTRUCTION. 





os FPIIF FLTG PNT 


PRT A 


MACRO M1117 


G 4 
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FID, INTERRUPT DISABLE, BIT TEST SEQ 0045 
1918 006156 170000 £4: CFCC 
1620 006160 170201 STFPS RI sSEE IF ERROR WAS DETECTED. 
1621 606162 022701 140000 CMP #140000,R1 
1622 006166 001005 BivE FERRO 
1624 006170 170304 STST R4 sSEE IF FEC=2 
1625 006172 022704 000002 CMP #2 ,R4 
1626 006176 001010 BNE EERR1 
44 0062 0431 BR E DONE 
1629 006202 EERRO: sREPORT FPS INCORRECTLY SET. 
1630 006202 010137 001240 MOV R1,a4$TMP3 
1631 006206 012737 140000 001242 MOV #140000, aS TMP4 
1632 006214 104022 1$: ERROR +22 
weer 006216 000422 BR EDONE 
1635 006220 FERRI ;REPORT FEC NOT 2. 
1636 006220 010537 001240 MOV RS, a4$STMP3 
1637 006224 010437 001242 MOV R4,aASTMPS 
1638 006230 104023 1$ ERROR + 
+ a4 006232 000414 BR E DONE 
1641 006234 021627 006156 EERR2: CMP (SP) ,AES ;DID THE ILLEGAL INSTRUCTION TRAP? 
1642 006240 001402 BEG 1$ 
1643 006242 000137 040234 JMP @4F PSPUR 
1645 006246 1$: 
1646 006246 011637 001236 MOV (SP) ,a#$TMP2 
1647 006252 022626 MP (SP)+,(SP)+ 
1648 006254 170201 STFPS RI 
1649 006256 010137 001240 MOV R1,a4$TMP3 
1679 006262 104024 23 ERROR +24 
1652 006264 EDONE : 
006264 104412 RSE TUP :GO INITIALIZE THE FPS AND STACK; AND 
:SEE IF THE USER HAS EXPRESSED 
>THE DESIRE TO CHANGE THE SOF TWARE 
VIRTUAL CONSOLE SWITCH REGISTER (HAS 
7 THE USER TYPED CONTROL G?). 
1653 
1654 
1667 CLARA ERAARERAARAEEARARRARERARAERRAAARAENRRERAARARARARATRAARAR EER 
:sTEST 6 LDD AND STD, WITH SRC AND DST MODE 1, TEST 
:sTHIS IS A TEST OF BOTH THE INSTRUCTION: 
LDD (RO) ,ACO 
: AND THE INSTRUCTION: 
STD ACO, (RO) 
* SMOST: OF THE FAILURES ARE [SOLATED TO THE SRC OR DST FLOWS. NOTE 
;* THAT THE INTEGRITY OF ACO HAS NOT BEEN ASSURED. THIS MEANS THAT 
:*IN SOME CASES IT WILL BE IMPOSSIBLE TO ISOLATE CERTAIN DATA PATTERN 
:*FAILURES TO EITHER THE FLOWS OR THIS ACCUMULATOR. 
SF AAAAARAAAAARARAAAERARAARAERARERAARAEERAARARRRAREHRAAHRRAEHRERA RAED 
006266 000004 TST6: SCOPE 


CKFPAAO FP1IF FLTG PNT PRT A 
16 LDD 


AND STD, WITH SRC AND DST MODE 1, 


1669 006270 
006270 
1679 006272 


— at et ae ot os 
YAY YISIISg 
OONAMEWRH —-O NOW 
w Nm 
Oo NM Nm 


— = 
NINN 
MmrY 
US 

VE 


1723 006500 


eos ee 
2333 -+yyOm 
th a a 
NYNNO-? 
ooo 
Wwh-— 


020327 
001402 
000137 


012701 


104413 
012737 


012703 


077402 


012700 
012737 


00500 % 


006342 


010074 
010140 
000010 


010104 
007560 


010104 
006724 
000002 
007022 
010074 


010140 
000010 


006666 


000200 
007540 


006502 
177777 


000010 
010116 


010126 
007726 


MACRO M1111 
Fil: 
001236 
Fe: 
000004 
Fs 
F4: 
FS: 
1$: 
2$: 
3$: 
Fé: 
001236 
F7: 
000004 


H 4 
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SEQ 0046 

;SET UP THE LOOP ON ERROR ADDRESS. 
MF 3, aASTMP2 
RO 
RO 
#FDATIO,R1 7 SET UP THE LOAD DATA. 
#FXDATO,R2 

10,R3 i 
(R2)+,(R1)+ 

2 


° 


#FDATI4,RO :SETUP RO FOR THE LDD (RO),ACO. 
#FERR20, aMERRVECT ;IF THE SRC FLOWS FAIL THEN 
at ;AN GDD ADDRESS MAY OCCUR. 

(RO) ,ACO 
R3 
R3 
— WAS RO AFFECTED? 

c 
@AFERR1 
R3,42 sSEE IF THE PC WAS ADVERSELY 
1$ sAFFECTED DURING THE INSTRUCTION. 
OAF ERR? 
#FDATIO,R1 sMAKE SURE THE SOURCE DATA WAS 
#FXDATO,R2 NOT AFFECTED. 
#10,R3 

(R1)+,(R2)+ 

3$ 
aA4FERRO 

MAKE SURE THE FPS IS CORRECT. 
#200. R1 
BSFERRI? 
;SET UP THE LOOP ON ERROR ADDRESS. 

#F10,a4$TMP2 
#-1,R3 
#10,R4 ; 
#FDATOO, R5 >SET UP THE OUTPUT DATA BUFFER. 

R3, (R5)+ 
RG_F7 
#F DATOS ,RO :SET UP RO FOR DST MODE . REG Q. 
#FERR2S. a#ERRVECT TIF THE DST FLOWS FAIL AN ODD 
- * ADDRESS COULD OCCUR. 





CKFPAAO FP11F FLTG PNT PRT A MACRO 


16 


LDD 


174010 


012701 
012702 


022122 
001402 
000137 


022722 
001402 
000137 
022122 
001402 
000137 
022122 
001402 
000137 


022122 


012737 


AND STD, WITH SRC AND DST 


010126 
007062 
000002 
000320 


010116 
010140 


007160 


007160 


007160 


00716C 


007504 


007214 


000514 


007504 


000200 


007540 
010160 


010140 001240 


Fie: 


F135: 


F13: 


F14: 


PIS: 


F16: 


Fi7: 


F20: 


F21: 


F22: 


F23: 
FERRO: 


MOV 


I 4 
11. 26=SEP=79 09:38 PAGE 11-8 
MODE 1, TEST 


ACO, (RO) 
R3 

R3 

RO, #F DATOS 
F12 

aAF ERR 


#FDATOO,R1 
#FXDATO,R2 


(R1)+,(R2)+ 
F13 

@aAFERRS 
(R1)+,(R2)+ 
F14 

@AFERRS 
(R1)+,(R2)+ 
F15 

@A4FERRS 
(R1)+,(R2)+ 
F16 

@4FERRS 
(R1)+,(R2)+ 
F17 
@4FERR10 
(R1)+,(R2)+ 
F20 
@4FERR6 
(R1)+,(R2)+ 
F21 

FERR7 
(R1)+,(R2)+ 
F22 
aAFERR10 

R1 

R1 

#200,R1 

F23 
aA4FERR11 
@AF DONE 


MF XDATO, aa$TMP3 


; TEST INSTRUCTION. 


;WAS RO MODIFIED? 


WAS THE PC AFFECTED CORRECTLY? 


;SEE IF THE DATA WAS OUTPUT 
370 THE TARGET AREA CORRECTLY. 


sMAKE SURE FPS IS CORRECT. 


;SOURCE DATA AFFECTED BY 
; THE LDD INSTRUCTION, 





SEQ 0047 


Ouke 
ee 


012737 
0 


012737 
010037 
012737 
012737 
022700 
061004 
012737 
000412 
022700 
001004 
012737 
000403 
104027 
000137 


104026 
000137 
012701 


010137 
162701 
006303 


012701 
000762 
012737 
010037 
012737 
012737 
022700 
001004 
012737 
000412 


022700 


CKFPAAQ FP11F FLTG PNT PRT A 
T6 LDD 


J 4 
MACRO M1111 26=SEP=79 09:38 PAGE 11-9 
AND STD, WITH SRC AND DST MODE 1, TEST SEQ 0048 
010152 001242 MOV #F XDATO+12,a4$TMP4 
010074 001244 MOV #FDATIO, a#$TMPS 
010106 001246 MOV #FDATIO+12, a4$IMP6 
1$: ERROR +25 
010160 JMP aeF DONE 
010104 001242 FERRI: MOV #FDATI4, a#STMP4 zFSRC FLOWS FAILURE. 
001240 MOV RO, aA$TMP3 
000762 001244 MOV #762, Q4STMPS 
000321 001250 MOV #321,a4$TMP7 
010074 ow #fDATIO.RO zFSRC MODE 4? 
000324 001246 MOV #324, aASTMP6 
BR 4$ 
010114 1$: cme oF DATI4*10,R0 iFSRC MODE 2? 
000322 001246 MOV #322, a4STMP6 
BR 4$ 
es: 
3$: ERROR +27 
010160 JMP aaF DONE 
4$: 
5$: ERROR +26 
010160 JMP a@4F DONE 
006344 FERR2: MOV #F4,R1 s THE PC WAS INCORRECTLY AFFECTED 
DURING THE INSTRUCTION. 
001242 FER2: MOV R1,a4$TMP4 
000004 SUB RI 
ASL 
ADD R3,R1 
001240 MOV R1,a4STMP3 
1$: ERROR +30 
010160 JMP aa4F DONE 
006504 FERRG: MOV #F11,R1 
BR FER2 
010126 001242 FERR3: MOV #F DATOS, @ASTMPS :FAILURE IN THE FDST FLOWS. 
001240 MOV RO, a4$TMP3 
000527 001244 MOV #527, ahSIMPS 
000641 001250 MOV #641, a4$TMP7 
010116 cw #F DATOO.RO DST MODE 4? 
| 
000644 001246 MOV #644, AAS TMPE 
BR 4$ 
010136 1$: CMP #F DATO04+10,R0 :DST MODE 2? 
000642 001246 MOV #642, GAS TMP6 
BR 4$ 


001004 
012737 
000403 


“am 


CKFPAAQ FPI1IF FLTG PNT PRT A 


T6 


LOD 


1838 007144 
1839 007144 
1840 007146 
1841 


ARERR 
OCOOGNOWS 
egege 
S3ae8 


1870 007276 
1874 007312 
1875 


1876 
1877 007314 


1889 007366 
1890 007370 
1891 
1892 
1893 007372 
1894 007376 


012703 


000737 
07730 


012737 


104035 
000137 


012701 


010160 
01016C 
010140 


010160 


010130 
177777 
000003 


001240 
12 


010160 
010130 
000003 


007504 


010160 


010132 
177777 
000002 


001240 
000707 


MACRO M1111 


001242 
001244 
001246 

1$- 


FERR6: 


001244 
001246 
001250 
2s: 
5$: 


6$: 


7$: 


001244 
001246 
001250 


001244 


ERROR 
JMP 


Kk 4 
26-SEP=79 09:38 PAGE 11-10 
AND ST, WITH SRC AND DST MODE 1, TEST 


+32 
@4F DONE 


+31 
@4F DONE 


RO, a4STMP3 
#FDATOO, aA STMPS 
#FDATO7, aA#$TMP5S 
#F XDATO, AASTMP6 
+33 
a4F DONE 
#FDATOS,Ri 
#-1,R2 
#3,R3 
R2,(R1)+ 

5$ 
R3,1$ 
RO, a#$TMP3 
#412, a4STMPS 
#147, Q4STMP6 
#145 ,aASTMP7 
+34 
a4F DONE 
#FDATOS,R1 

3,R3 
(R1)+ 

7$ 
@4FERR10 
R3,6$ 


’ 


RO, a#$TMP3 


+35 
@4F DONE 


#FDATO6,R1 
4-1 ~R2 
#2,R3 
R2,(R1)+ 
5$ 

R3,1$ 


RO, aa#$TMP3 
#707, aASTMPS 





FAILURE OF STD. 


:DID (BUT GR7) FAIL IN THE FDST 
FLOWS? 


;REPORT FAILURE OF (BUT GR7) IN 
7; THE FDST FLOWS. 


DID (BUT GR7) FAIL IN THE SRC FLOWS? 


REPORT FAILURE OF (BUT GR7) IN 
3 THE FSRC FLOWS. 


:DID (BUT FD) FAIL IN THE FDST FLOWS? 


REPORT FAILURE OF (BUT FD) IN THE 
iFDST FLOWS. 





A 


CKFPAAO FP11F FLTG PNT PRT A 
LDD AND STD, WITH SRC AND DST MODE 1, TEST 


16 


1895 007404 


1906 

1907 

1908 007450 

909 007454 
462 


1936 007620 
1937 007624 
1938 
1939 007626 
1940 007632 
1941 


1947 
1948 007650 
1949 007654 
1950 007656 
1951 


012737 
012737 
36 


010137 
012737 
104041 
000137 
012737 


012737 


021627 
001424 


020027 
001006 


012737 
022626 
042 


000244 
000245 


010160 
010132 
000002 


007504 


010150 
010160 


001240 
000200 


010160 


010102 


000325 


010106 
040266 


MACRO M1111 


001246 
001250 


001244 
001246 
001250 


001246 


001242 


001264 


001244 


001246 


2$: 


5$: 
6$: 


7$: 


10$: 


FERR10: 


1$: 


FERR11: 


1$: 


FERR20: 


1$: 


2$: 


L 4 
26-SEP=79 09:38 PAGE 11-11 


#244 ,QASTMPE 
#245 ,a4STMP7 
+36 


@4F DONE 
#FDATO6,R1 
#2,R3 

(R1)+ 

7$ 

@4FERR10 
R3,6$ 

RO, a4$TMP3 
#76, 04S TMP6 
#77 ,AASTMP7 


+37 


@4F DONE 


RO, a4$TMP3 
#FDATO4,, @ASTMPS 
#FDATO7, aA$STMPS 
#FXDATS, AAS TMP6 
+40 

@A4F DONE 


R1,a4$TMP3 

#200, a4STMP4 

+41 

a4F DONE 

#NULL , AA STMP15 
TMP 1 


#321, Q4#$TMP7 
#762 ,@ASTMPS 


(SP) ,AF4+2 
FERR21 


RO,AFDATI3 
2$ 


#325 ,aASTMP6 
(SP) +, (SP)+ 
+42 

F DONE 


RO,AFDATIS 
3$ 
a4 CPSPUR 


SEQ 0050 


;DID (BUT FD) FAIL IN THE FSRC FLOWS? 


;REPORT FAILURE OF (BUT FD) IN THE 
sFSRC FLOWS. 


;REPORT DATA ERROR. 


sREPORT BAD FPS. 


THE EXECUTION OF THE LDD 
;CAUSED A TRAP TO 4, BECAUSE 
sA FSRC FLOW FAILURE RESULTED 
IN AN ODD ADDRESS. 


SEE IF FSRC MODE 6 OR 7 WAS 
EXECUTED. 


3FSRC MODE 5? 
;REPORT FSRC FLOW FAILURE TO 
;MODE 5. 


sFSRC MODE 3? 


ma 


M 4 
CKFPAAQ FP11F FLTG PNT PRT MACRO M1111 26=SEP=79 09:38 PAGE 11-12 
6 LDD AND STD, WITH SRC AND DST MODE 1, TEST 


1952 007662 3$: 
1953 007662 012737 000323 001246 MOV #323, a4STMP6 
1954 007670 022626 CMP (SP)+,(SP)+ 


1955 007672 104042 4$: ERROR +42 


.4 
sREPORT FSRC 
MODE 3. 


FLOW FAILURE TO 


SEQ 0051 


CKFPAAO FP11F FLTG PNT PRT A 
16 LDD AND STD, WITH SRC AND DST MODE 1, 


bye 007674 000531 


1959 007676 022626 FERR21: 
1960 


1961 007700 012737 042212 001264 
1962 007706 012737 000326 001246 
1963 007714 012737 000327 001252 
1964 007722 104042 1$: 
1965 007724 000515 


1967 007726 012737 040445 001264 FERR25: 
00 005037 


1968 007734 001252 
1969 007740 012737 010126 001240 
1970 007746 011637 001236 
1971 752 012737 527 001244 
Mb 4 007760 012737 0 001250 


1974 007766 021627 006504 
1975 007772 001424 


1976 

1977 007774 020027 010124 
bps 010000 001006 

1980 


1981 010002 012737 000645 001246 
1982 010010 022626 
104043 


1983 010012 1$ 
1984 010014 6 

1985 

1986 010016 020027 010130 2$: 


1988 010024 000137 040266 


990 

1991 010030 012737 000643 001246 

1992 010036 022626 

1993 010040 104043 4$: 
010042 000446 


010044 FERR26: 


012737 042212 001264 
010052 012737 000646 001246 
010060 012737 000647 001252 


SEE 
F 


01 022626 
2001 010070 10404 1$ 
pot 010072 000432 
010074 177777 FDATIO 
5 010076 177777 FDATI1 
2006 010100 177777 FDATI2 
2007 010102 177777 FDATI3 
2008 010104 177777 14 
2009 010106 177777 FDATIS 
2010 010110 177777 FDATI6 
2011 010112 177777 FDATI7 
2012 010114 177777 
2013 010116 177777 FDATOO: 


BR 
CMP 


N 4 
MACRO M1111 —“— 09:38 PAGE 12 


F DONE 
(SP) +, (SP)+ 


4MS16, 4S TMP15 


#326, a4STMP6 
=) Capacities 
+ 


F DONE 


A#NULL , AS TMP15 
a4$TMP10 
#FDATO4 , AASTMPS 


(SP) ,@ASTMP2 
#527 ,QASTMPS 
#641, @A#STMP7 


(SP) ,AF10+2 
FERR26 


RO, AF DATO3 
2$ 


#645 ,a4$TMP6 
(SP) +, (SP)+ 
+43 

F DONE 


RO,AF DATOS 
a4 CPSPUR 


#643, a4$ TMP6 
(SP)+, (SP) + 
+43 

F DONE 


4MS16,a4$TMP15 
#646, 4S TMP 
#647 ,aASTMP10 
(SP) +, (SP) + 
+43 


F DONE 


SEQ 0052 


REPORT FSRC FLOW FAILURE TO 
MODE 6 OR MODE 7. 


3; THE EXECUTION OF THE s INSTRUCTION 
; TRAPPED TO 4, BECAUSE A FAILURE 

TIN THE FDST FLOWS RESULTED 

SIN AN ODD ADDRESS. 


sFLOW FAILURE TO FDST MODE 6 OR 7? 
:DID FDST FLOW FAIL TO MODE 5? 
;REPORT FLOW FAILURE TO FDST 

MODE 5. 


:DID FDST FLOW FAIL TO MODE 3? 


REPORT FDST FLOW FAILED TO MODE 3. 


gt FDST FLOW FAILURE TO MODE 


OR MODE 7 


i 


16 


8 5 
— 09:38 PAGE 12-1 


3GO INITIALIZE THE FPS AND STACK; AND 


0 HE S 
;VIRTUAL CONSOLE SWITCH REGISTER (HAS 
; THE USER TYPED CONTROL G?). 


WEAR e RARER RRERRRRSERERARRRRRRARERA RARER EARS RRR RRR RRA RARER RRR SS DBS 


FSRC MODE O TEST 


:*THIS IS A TEST OF FSRC MODE ZERO USING THE LDD AND LDF INSTRUCTIONS. 
** 


WEROARRERARALRESZASLSASESASARRASSRSRE RARER SSSA R SRR RA RAS ARR RRR ARRAS RSD ED | 


CKFPAAO FPI1IF FLTG PNT PRT A MACRO M1711 

LDD AND STD, WITH SRC AND DST MODE 1, TES 
2014 010120 177777 FDATO1: <1 
2015 010122 177777 FDA : <1 
2016 010124 177777 FDATOS: <1 
2017 010126 177777 FDATO4: =1 
2018 010130 177777 FDATOS: <1 
2019 010132 177777 FDATO6: -1 
2020 010134 177777 FDATO?7: <1 
2021 010136 177777 -1 
2022 010140 177777 FXDATO: -1 
2023 010142 177777 FXDAT1: <1 
2024 010144 177777 FXDAT2: -1 
2025 010146 177777 FXDAT3: =-1 
2026 010150 052525 FXDAT4: 052525 
2027 010152 031463 FXDATS: 031463 
2028 0101 007417 FXDAT6: 007417 
2029 010156 000477 FXDAT7: 000477 
2030 
2031 
2032 010160 F DONE : 

010160 104412 RSETUP 
2033 
2034 
2040 33 

i*TEST 7 

01016, 4 TST7: SCOPE 
2041 010164 104413 LPERR 
2043 010166 11: 
2044 010166 170011 SETD 
2045 010170 012700 011012 MOV 
2046 010174 012701 010762 MOV 
2047 010200 012702 000004 MOV 
2048 010 012120 i2: MOV 
pit 010206 077202 SOB 
2051 010210 012700 011012 MOV 
$028 010214 172510 LDD 
2054 010216 012700 010772 MOV 
Shep 010222 172410 LDD 
2057 010224 012701 MOV 
2058 010230 012737 010562 000004 MOV 
2059 010236 012737 010252 001236 MOV 
2069 010244 012737 042672 001240 MOV 
2061 010252 172401 13: LDD 
2062 010254 000240 14: NOP 
Ser 010256 000240 15: NOP 


#IDATIO,RO 
#IPAT10,R1 


#4,R2 
<tc 


ao 


#IDATIO,RO 
(RO) ,ACT 


#IPAT20,RO 

(RO) ,ACO 

#1,R1 

#IERRO, AAERRVECT 
#13, a4$TMP2 
#MS 35, a#STMP3 
AC1,ACO 


;SET UP THE LOOP ON ERROR ADDRESS. 


3327 FO. 


;SET UP THE INPUT DATA BUFFER. 


LOAD AC1 


;LOAD ACO 


IN CASE THE FSRC FLOWS FAIL 
7AN ODD ADDRESS TRAP TO 4 MAY OCCUR. 


TEST INSTRUCTION, 


Ck 
T1 


C § Saree 
CKFPAAO FP11F FLTG PNT PRT A MACRO M1111 26-SEP-79 09:38 PAGE 12-2 Ck 
17 FSRC MODE 0 TEST SEQ 0054 11 
2065 010260 012700 011002 MOV #IDATOO,RO 
2066 010264 174010 STD ACO, (RO) :GET ACO, THE RESULTS. 
2068 010266 012700 011002 MOV #IDATOO,RO :SEE IF DATA IS CORRECT. 
2069 010272 012701 011012 MOV MIDATIO,R1 
2070 010276 012702 000004 MOV #4 R2 
2071 010302 022021 16: CMP (RO)+,(R1)¢4 
072 010304 001424 BEQ 1105 
2074 010306 012700 011006 MOV #IDATO2.RO sSEE IF (BUT FD) FAILED. 
2075 010312 012702 000002 MOV #2,R2 
2076 010316 005720 I?: TST (RO) + 
2077 010320 001413 BEQ 110 
2079 010322 012700 011006 MOV #IDATO2,RO 
2080 010326 012702 000002 MOV #2,R 
2081 010332 022720 177777 1$: CMP #-1,(RO)+ 
2082 010336 001402 BEQ 2$ 
2083 010340 000137 010644 JMP a#IERRI 
2084 010344 077206 23: SOB R2,1$ 
2085 010346 000401 BR 1106 
2086 010350 077216 110: S0B R2,17 
2087 010352 000137 010664 1106:  JMP av ERR2 
2089 010356 077227 1105: SOB R2,16 
isd zNOW TEST THE LOAD INSTRUCTION WITH FSRC MODE ZERO AND FD CLEAR. 
2093 010360 111: 
010360 104413 LPERR :SET UP THE LOOP ON ERROR ADDRESS. 
2095 010362 012700 010762 112: MOV #IPAT10,RO 
2096 010366 012701 011012 MOV MIDATIO.R1 
2097 010372 012702 000004 MOV #4 R2 
2098 010376 012021 113: MOV (RO) +, (R1)+ 
2099 010400 077202 S0B R2,113 
2101 010402 012700 011012 MOV #IDATIO,RO :SET UP ACI 
2102 010406 172510 LDD (RO) ,ACI 
2104 010410 012700 010772 MOV #IPAT20,RO :SET UP ACO 
2105 010414 172410 LDD (RO) ,ACO 
2107 010416 012701 000001 MOV #1,R1 
2108 010422 012737 010440 001236 MOV #114, a4STMP2 
2109 010430 012737 042677 001240 MOV 4S 36, AAS TMP3 
2110 010436 170001 SETF :CLEAR FD. 
2112 010440 172401 114 LDF ACT. ACO : TEST INSTRUCTION. 
2113 010442 000240 115 NOP 
e114 010444 000240 176 NOP 
2116 010446 170200 STFPS RO :SEE IF FPS IS STILL CLEAR. 
2117 010450 022700 000004 CMP #4 RU 
2118 010454 001402 BEQ 11? 
e119 010456 000137 010736 JMP a#lERR3 





| dD 5 
CKFPAAD F FP11F FLTG PNT PRT A MACRO M1111 26=SEP=79 99:38 PAGE 12-3 


FSRC MODE O TEST SEQ 0055 

2121 010462 117: RESET TO DOUBLE MODE. 
$156 010462 170011 SETD 
2124 010464 012700 011002 MOV #I1DATOO,RO 
$182 010470 174010 STD ACO, (RO) GET ACO 

' 
2127 010472 012737 177777 011016 MOV #-1 ,A#IDATI2 
2128 010500 912737 177777 011020 MOV #-1,a#IDATI3 
2129 010506 012700 011002 MOV #IDATOO,RO 
2130 010512 012701 911012 MOV oreo R1 
2131 010516 012702 000004 MOV R2 
2132 010522 022021 120: CMP {ROD + (RI) :SEE IF ACO WAS CORRECT. 
Sie 010524 001414 BEQ 123 
2135 010526 023737 011006 010766 CMP OP IDATO2 ,AMIPATI2 ;DID (BUT FD) FAIL? 
2136 010534 001402 BEG 122 
2137 010536 000137 010644 121: JMP @F7IERR1 
2138 010542 023737 011010 010770 I22: CMP 4 IDATO3 ,a#IPAT13 
2139 010550 001372 BNE 121 
Slat 010552 000137 010712 JMP AF IERRS 
Sie$ 010556 077217 123: SOB R2,120 
Slee 010560 000520 BR IDONE NO ERRORS. 
2146 ;1F AN ODD ADDRESS TRAP OCCURS COME HERE TO ANALYZE THE FSRC FAILURE. 
2147 010562 022716 010254 TERRO: CMP #14, (SP) MAKE SURE THE TRAP OCCURRED 
2148 010566 001413 BEQ 1$ ;ON THE INSTRUCTION BEING TESTED. 
2149 010570 022716 010256 CMP #15, (SP) 
2150 010574 001410 BEQ 1$ 
2151 010576 022716 010442 CMP #115, (SP) 
2152 010602 001405 BEQ 1 
2153 010604 022716 010444 C #116, (SP) 
2154 010610 001402 BEQ 1$ 
3 4 010612 000137 040266 JMP a4CPSPUR 
2157 010616 011637 001236 1$: MOV (SP) ,@ASTMP2 REPORT FAILURE. 
2158 010622 012737 000627 0061240 MOV #627 ,aASTMP3 
2159 010630 012737 000320 901242 MOV #320, a4$TMP4 
2160 910636 022626 CMP (SP)+,(SP)+ 
2161 010640 104047 2$: ERROR +47 
$106 010642 000467 BR 1 DONE 
2164 ;REPORT DATA ERROR. 
2165 010644 IERRI: 
2166 010644 012737 011012 001242 MOV MIDATIO, a@ASTMP4 
2167 010652 012737 011002 001244 MOV MIDATOO, aASTMPS 
2168 010660 104051 1$: ERROR +51 
19 010662 000457 BR IDONE 
2171 REPORT FAILURE OF (BUT FD) _ 
2172 010664 012737 000153 001244 IERR2: MOV #153, a4STMPS 
2173 010672 012737 000434 001246 MOV #434, QASTMP6 
2174 010700 012737 000435 001250 MOV #435 ,aA$TMP/ 
2175 010706 IERR25: 
4 a} 010706 104050 1$: ERROR +50 


010710 000444 BR I DONE 





— 5 Lh > ere 
CKFPAAO FP11F FLTG PNT PRT A MACRO M1111 26=SEP=79 09:38 PAGE 12-4 Ch 
FSRC MODE 0 TEST SEQ 0056 1 
2178 010712 012737 000153 001244 IERR4: MOV #153, aaSTMPS 
2179 010720 012737 000435 001246 MOV #435 aa IMP6 
2180 010726 012737 000434 601250 MOV #434. a#STMP7 
181 010734 000764 BR JERR25 
2183 :REPORT INCORRECT FPS AFTER LOAD INSTRUCTION. 
2184 010736 TERR3: 
2185 010736 012737 010440 001236 MOV #114, a4STMP2 
2186 010744 010037 001240 MOV RO, a#$TMP3 
2187 010750 012737 000004 001242 MOV #4. BASTMPG 
2188 010756 104041 1$: ERROR +41 
2189 010760 000420 BR [DONE 
2190 
2191 
2192 010762 000000 IPAT10: 0 
2193 010764 170360 IPAT11: 170360 
2194 010766 016161 IPAT12: 016161 
2195 010770 052525 IPAT13: 052525 
2197 010772 177777 IPAT20: =1 
2198 010774 177777 IPAT21: =1 
2199 010776 177777 IPAT22:. =1 
2200 011000 177777 IPAT23: =1 
Cc 
2202 011002 000000 IDATOO: 0 
2203 011004 000000 IDATO1: 0 
2204 011006 000000 IDATO2: 0 
205 011010 000000 IDATO3: 0 
2207 011012 000000 IDATIO: 0 
011014 000000 IDATI1: 0 
2209 011016 000000 IDATI2: 0 
2210 011020 000000 IDATI3: 0 
2212 011022 IDONE : 
011022 104412 RSE TUP :GO INITIALIZE THE FPS AND STACK: AND 
“SEE IF THE USER HAS EXPRESSED 
‘THE DESIRE TO CHANGE THE SOFTWARE 
‘VIRTUAL CONSOLE SWITCH REGISTER (HAS 
‘THE USER TYPED CONTROL G?) 
2213 
22:9 
2220 . 2A Re TTI Te ST Re TITRE REE E RRR E RR EERE ETE REE RE RE Re 
:STEST 10 FDST MODE 0 TEST 
j*THIS IS A TEST OF THE STORE INSTRUCTIONS, STD AND STF, WITH FDST MODE 0. 
: MeBBEBASZASZAAALALAZASLALALLASLAESRARE SERS SRE SASSER ESE R EPR RRR RRR RR RES ES SS 
011024 000004 78110: SCOPE 
2221 011026 11: 
011026 104413 LPERR :SET UP THE LOOP ON ERROR ADDRESS. 
2222 011030 170011 SETD :SET FD 
2223 011032 012700 011570 MOV #TPAT10.RO 
2224 011036 012701 011620 MOV #TDATIO.R1 
2225 011042 012702 000004 MOV #4 .R2 
2226 011046 012021 (2: MOV (RO)+,(R1)¢ :SET UP THE INPUT DATA BUFFER. 
2227 011050 077202 SOR R2,12 
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T10 FDST MODE 0 TEST SEQ a | 
2228 
2229 011052 012700 011620 MOV #TDATIO,RO ZLOAD ACO 
2230 011056 172410 LDD (RO) ACO 
2232 011060 012700 011600 MOV #TPAT20,RO ZLOAD AC1 
3235 011064 172510 LDD (RO) ,AC1 
2235 011066 012701 000001 MOV #1,R1 os JF THE (BUT FDST) FORK FAILS 
2236 011072 012737 011376 000004 MOV #TERRO, @VERRVECT ;AN ODD ADDRESS TRAP COULD RESULT. 
2237 011100 012737 011114 001236 MOY #13, aaSTMP2 
2238 011106 012737 042672 001240 MOV msi ars TMP 
2239 011114 174001 13: STD ACO,AC1 
2240 011116 000240 Té: NOP 
2241 011120 000240 1S: NOP 
2243 011122 012700 011610 MOV #TDATOO,RO 
ge44 011126 174110 STD AC1, (RO) :GET THE DATA. 
2246 011130 912703 011610 MOV #TDATOO,R3 sSEE IF THE DATA IS CORRECT. 
2247 011134 012704 011620 MOV #TDATIO,RS | 
2248 011140 012705 000004 MOV #4 RS 
2249 011144 022324 Té: CMP (R3)+, (RG)+ 
2250 011146 001413 BEQ 7105 
2252 011150 012703 011614 © MOV #TDATO2,R3 :DID (BUT FD) FAIL? 
2253 011154 012705 000002 MOV #2,R5 
2254 011160 005723 17: TST (R3)+ 
2255 011162 001402 BEQ T10 
2256 011164 000137 011460 JMP @ATERRI 
2257 011170 077505 110: SOB R5,17 
2258 011172 000137 011500 JMP QATERRZ 
2260 011176 077516 1105: SOB RS,16 
2262 :NOW TEST THE STF ACO,AC1 INSTRUCTION. 
2264 011200 111: 
3265 011200 104415 LPERR 7SET UP THE LOOP ON ERROR ADDRESS. 
2266 011202 012700 011570 Tle: MOV #TPAT10,RO SET UP THE INPUT DATA BUFFER. 
2267 011206 012701 011620 MOV #TDATIO.R1 
2268 011212 012702 000004 MOV #4 ,R2 
2269 011216 012021 113: MOV (RO) +, (R1)+ 
2270 011220* 077202 SOB R2,113 
2272 011222 012700 011620 MOV #TDATIO,RO :SET UP ACO 
073 011226 172410 LDD (RO) ,ACO : 
2275 011230 912700 011600 MOV #TPAT20,RO :SET UP AC) 
2276 011234 172510 LDD (RO) ,ACT 
2278 011236 012701 000001 MOV #1,R1 
2279 011242 012737 011260 001236 MOV #714, a#$TMP2 
2280 011250 012737 042677 001240 MOV WMS 36, aASTMPS 
2281 011256 170001 SE TF =CLEAR FD 
2282 011260 174001 T14: STF ACO,AC1 : 
2283 011262 000240 115: NOP 





CKFPAAO FP1IF FLTG PNT PRT A 


110 FDST MODE 0 TEST 


2284 011264 
2285 


a 


WWW WAIWAIIWANAG lw 
Yee EFEMLS ZS 


aiatitet atta afta ad od 
vw 


a 

Nm 
essss OOCOoOOo0O0O OO OO 
Gjutigskaab aheababaiaiabah aba ata’ 


mnon 
WWW 
—— = 
Who 
o Oo 
—_> 
—_> — 
WW 
N WN 
nm oO 


Sele 011374 


Saso 011426 
2328 011432 
29 


2333 011456 
34 


5 
2336 011460 
2337 011460 
2338 011466 
2339 011474 
2340 011476 


000240 


012700 
174110 


012737 


023737 
001401 
000440 
023737 
001373 
000456 


077515 
000515 


022716 


000010 


011610 


177777 
177777 
011610 
011620 
000004 


011614 


011616 


011116 
011120 
011262 
011264 
040266 
001236 
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011624 
011626 


011574 


011576 


001240 
001242 


001242 
001244 


T16: 


T20: 


T21: 
T22: 


123: 


; TRAP HE 
TERRO: 


C 
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#TDATOO,RO 
AC1, (RO) 


#-1 ,AATDATI2 
#~-1 ,AATDATI3 
#TDATOO,R3 
ATDATIO,RS 


#4 R5 
(R3)+, (RG) 
123 


@ATDATO2 ,AATPAT IC 
T22 


TERR1 
@ATDATO3 ,a#TPAT13 
T21 


TERRS 


R5,720 
TDONE 


BEQ 1$ 
CMP #75, (SP) 
BEQ 1 
CMP #715, (SP) 
BEQ 1$ 
CMP #116, (SP) 
BEQ 1 
JMP a4 CPSPUR 
MOV (SP) ,@A#$TMP2 
CMP (SP)+, (SP) + 
MOV #527 ,QASTMPS 
MOV #640, aASTMPS 
ERROR +121 
TDONE 
DATA FAILURE. 
MOV #TDATIO, aA$TMP4 
MOV #TDATOO, aa#$TMP5 
ERROR +123 
BR TDONE 


;SEF IF FPS IS CLEAR. 


sSET FD. 


sPICK UP ACI. 


7WAS THE DATA TRANSFERRED CORRECTLY? 


:DID (BUT FD) FAIL. 


RE THROUGH VECTOR 4 IF AN ODD ADDRESS OCCURS. 
MP #14, (SP) ;MAKE S 


F URE THE TRAP WAS ON 
AN INSTRUCTION BEING TESTED. 


SEQ 0058 


H § | 
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2341 

2342 :REPORT FAILURE OF (BUT FD). 

2343 011500 012737 000160 001246 TERR2: MOV #160, a4$ MP6 

2344 011506 012737 909161 001250 MOV #161, a4$TMP7 

2345 011514 012737 000640 001244 TERR2S: MOV #640. a4$TMP5 

2346 011522 1046122 1$: ERROR +122 

2347 011524 000441 BR TDONE 

2348 011526 012737 000161 001246 TERR4: MOV #161, a4$TMP6 

2349 011534 012737 00060 001250 MOV #160, a4$TMP7 

$330 011542 000764 BR TERR2S 

2352 sREPORT INCORRECT FPS AFTER STORE INSTRUCTION. 

2353 011544 TERR3: 

2354 011544 012737 011262 001236 MOV #715, Q4STMP2 | 

2355 011552 010037 001240 MOV RO, AAS TMP 

2356 011556 012737 000010 001242 MOV #10, a#$ TMP 

2357 011564 104041 1$: ERROR +41 

2338 011566 000420 BR TDONE 

2360 011570 000000 TPAT10: 0 

2361 011572 170360 TPAT11: 170360 

2362 011574 016161 TPAT12: 016161 

$363 011576 052525 TPAT13: 052525 

2365 011600 177777 TPAT20: -1 

2366 011602 177777 TPAT21: =1 

2367 011604 177777 TPAT22: -1 

$368 011606 177777 TPAT23: =1 

2370 011610 000000 TDATOO: O 

2371 011612 000000 TDATO1: 0 

2372 011614 000000 TDATO2: 0 

o373 011616 000000 TDATO3: O 

2375 011620 000000 TDATIO: O 

2376 011622 000000 TDATI1: 9 

2377 011624 000000 TDATI2: 0 

2378 011626 000000 TDATI3: 0 

2380 011630 TDONE : 

011630 104412 RSETUP GO INITIALIZE THE FPS AND STACK; AND 

SEE IF THE USER HAS EXPRESSED 
>THE DESIRE TO CHANGE THE SOFTWARE 
‘VIRTUAL CONSOLE SWITCH REGISTER (HAS 
:THE USER TYPED CONTROL G?). 

2381 

2382 

2516 

2517 LLU EERE EEE REE EERE ERE EERE EERE EERE RENEE Ee 

;*TEST 1 ACCUMULATORS DATA PATTERNS TEST 


SATHIS IS A TEST OF THE FLOATING POINT PROCESSOR ACCUMULATORS. 
:EACH ACCUMULATOR IS TESTED IN TWO WAYS: 
1 TEST PATTERN GENERATED BY FLOATING A ONE ACROSS 
te A FIELD OF ZEROES 
i+ 2 TEST PATTERN GENERATED BY FLOATING A ZERO ACROSS 
te A FIELD OF ONES. 


ek 
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s*EACH OF ACCUMULATORS ACO THROUGH AC5 IS TESTED. 


‘NOTE THAT THIS TEST KEEPS A DYNAMIC RECORD OF THE LOGICAL ‘AND’ AND ‘OR’ 
>*OF THE FAILING DATA PATTERNS. THESE CAN BE VERY USEFUL IN DETERMINING 
z*STUCK BITS. IF THE USER HAS THE INHIBIT ERROR TYPE OUT SWITCH (SWR13) 
nf THEN THE ae rhe RECIEVE ge INDIVIDUAL ERROR MESSAGE PLUS 

AN ERROR SUMMARY THE END OF THE TEST. INHIBITING ERROR PRINT OUT 
‘eWILL INHIBIT ERROR " SUPPARY PRINT oy? EXCEPT IN THE CASE DESCRIBED BELOW. 
:*TO GET JUST THE ERROR SUMMARY WITH NO INDIVIDUAL ERROR REPORTS, 
 *SET SWITCH REGISTER BIT13 AND SWITCH REGISTER BIT? BOTH ON. 


THE FOLLOWING PROCEDURE IS PRESENTED TO AID THE TROUBLE 
; * SHOOTER IN SITUATIONS WHERE AM2901 CHIP ISOLATION IS ATTEMPTED. 


: WARNING: THIS PROCEDURE ASSUMES THAT THE FAULT IS IN ONE OF THE 
;*AM2901 CHIPS. THIS ASSUMPTION IS NOT NECESSARILY VALID IN ALL 
;*SITUATIONS. IT REMAINS TO BE SEEN WHAT NUMBER OF FAILURES CAN 
;*PROBABLILISTICALLY ASSOCIATED WITH THEM. NOTE ALSO THAT THIS 
;* INFORMATION SHOULD NOT BE TAKEN AS ABSOLUTE, THAT IS 

;*THIS INFORMATION IS THE AUTHOR'S SUGGESTION FOR ACHIEVING ISOLATION 
; *WHEN CHIP LEVEL REPAIR IS NECESSARY. 


WHEN THIS TEST HAS FINISHED RUNNING, IF ERRORS HAVE OCCURRED, 
;*AN ERROR SUMMARY WILL BE TYPED. THUS SUMMARY WILL CONSIST OF TWO 
pnt” tag QUANTITIES 

FOUR SIXTEEN BIT NUMBERS LABELED THE LOGICAL "AND* (‘**") 
e OF THE FAILING DATA PATTERNS. 
* B. FOUR SIXTEEN BIT NUMBERS LABELED THE LOGICAL ‘OR’ (*+") 
* OF THE FAILING DATA PATTERNS. 
°@ 


;*A BIT STUCK HIGH IN THE HARDWARE WILL SHOW UP AS A 0 IN THAT 
S*BIT POSITION OF THE ‘OR OF THE FAILING DATA PATTERNS. 
we 


:*A BIT STUCK LOW IN THE HARDWARE WILL SHOW UP AS A: IN THAT BIT 
¢ POSITION OF THE ‘AND’ OF THE FAILING DATA PATTERNS. 


: THUS IF A FAILURE OCCURS: 

: A. 3 ye HIGHS WILL SHOW AS Q" S_IN THE ‘OR* PATTERN. 
8. TUCK LOWS WILL SHOW AS 1°S IN THE ‘AND* PATTERN. 

:a1F THE F FAILURE. IS INTERMITTANT THEN THIS PROCEDURE WILL STILL 


IF THE FAILURE MOVES FROM ONE BIT TO ANOTHER, OR FROM ONE 
:*GROUP OF BiTS TO ANOTHER GROUP OF BITS THEN THE FAULT WILL 
;*PROBABLY NOT SHOW UP IN THE ‘AND’ OR THE ‘OR* PATTERNS; IN THIS 
>*CASE THE ‘AND’ PATTERN WILL BE ALL 0°S AND THE "OR’ PATTERN WILL 
>*BE ALL 1'S. WHEN THIS OCCURS SOME OTHER METHOD OF REPAIR MUST 
;*BE FOUND (SUCH AS INSPECTION OF EACH INDIVIDUAL ERROR REPORT 
;*RATHER THAN USING THE SUMMARY). 

-* 


>*MAP THE FOLLOWING NOTATION ONTO EACH BIT POSITION IN THE "AND" 
tia THE *OR*® PATTERNS WHICH ARE TYPED IN THE ERROR SUMMARY. 


:#a15 2A14,...A1,A0 815,B14,...B1,B0 (€15,C14,...C1,C0 D15,014,...€1,C0 


IN THIS NOTATION A15 THROUGH AO IS THE FIRST OF THE FOUR 16 BIT 
;*OCTAL NUMBERS TYPED, B15 THROUGH BO IS THE SECOND, ETC. 








SEQ 0060 


eee eed 


ven) 
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re ee ee ee ee ee ee 
od 


Be Be Be Be Se Se Be Be Be Be Be Be He He & 












—_— 
~~ 


BeBe Be Be Be Be 


se. 


ins) 


AN 
. 
~ 


er ee ee ee . . 
See be hb ahheaeseeaennhenne eee. 





Bie Be Be Be Be Be Be Be Be Be Be Be Be Be Be 









NOTATION. 


BITS 


A15,A14,A13,A12 
A11.A10.A9,A8 
A7,A6,A5 AG 
A3,A2,A1,A0 


B15,B14,B13,B12 
B11,810,B9,B8 
B7 86,85 ,B4 
83.82.81 .B0 


C15, C14, C13, (12 

cH €10.¢9,¢8 
7,(6, 5 C4 

5° C2.C1.CO 


D15,D14,D13,D12 
D11.D10.D9.b8 
D7,06.D5,D4 
D3.D2.D1.D0 


CHIP IS REPLACED AND THE ERROR PERSISTS THEN SUPPOSE THAT 


BIT IS, 
LN 


THEN IN GENERAL ANY OF THE FOUR CHIPS RESPONSIBLE FOR 
D BE AT FAULT, WITH LN BEING MUST PROBABLE. 


J. 5 
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TO 


THE HAR 








** 
;*THIS TABLE SHOWS THE CORRESPONDING AM2901 CHIP ("E* NUMBER) 
; WHICH IS ore that ECOS TO T BIT Bs .-ti., USING THE ABOVE 
TABLE OBSOLETE IF IT IS NOT UP DATED. NOTE ALSO THAT THERE ARE 
:*FOUR BITS FOR EACH AM2901 CHIP: 


DWARE MIGHT MAKE THIS 


AM2901 CIP NUMBER 


‘NOW FIVE IMPORTANT CASES WHICH WILL ARRISE WHEN A FAULTY 
>*AM2901 IS PRESENT CAN BE DESCRIBED: 


IF ONLY ONE BIT OF THE 64 BITS IS aT sha THE CHIP a i 
IN THE ABOVE TABLE IS 


MOST PROBABLY AT FAULT. BUT IF 


WHERE "L' IS A, B, C OR D 
ANDN IS 0 


14, 


AN, BN, CN OR DN COUL 
FOR EXAMPLE IF BIT Cl2 IS FAULTY, THEN CHIP E79 
PROBABLE 


IS THE MOST 


SOURCE OF THE ERROR. 
THAT CHIP DOES NOT REMOVE _ FAULT THEN ay EACH OF THE 
CHIPS ASSOCIATED WITH BITS A 
WITH EQUAL PROBABILI 


Br Ne 
IN ANY ONE OF THESE OTHER THREE CHIPS, TRY CHIPS E61, 


IF THERE ARE FOUR CONSECUTIVE BITS IN ERROR, FOLLOWING THE 
WHERE "L' IS A, B, C 
OR D. 

N=0,4,8 OR 12 


PATTERN: 


LN, LN+1, 


LN+2 AND LN+3 


AND 
THEN THE ABOVE TABLE SHOULD DIRECTLY IDENTIFY THE 


FAILING CHIP. 


IF FOUR BITS ARE DROPPED WHICH FIT THE PATTERN: 
AN CN AND DN 


e . 


WHERE N=15,14,... OR 0 


IF REPAIRING 


Al2, Bl2 AND D12 SHOULD BE TRIED 
TY OF THE FAULT BE] 


SEQ 0061 





“na 
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THEN ANY ONE OF THE FOUR CHIPS ASSOCIATED WITH EACH OF 
THE BITS AN, i, * AND DN COULD BE AT FAULT WITH 
EQUAL PROBABILIT 


4.) IF 16 BITS ARE IN ERROR, FITTING THE PATTERN: 
AN, AN+1, AN+2, AN+3 WHERE N=0,4,8 OR 12 
BN, BN+1, BN+2, BN+3 
CN, CN+1, CN+2, CN+3 
AND 


DN, DN+1, DN+2, AN+3 
THEN ANY ONE OF tHe FOUR CHIPS ASSOCIATED 
WITH THESE BITS COULD BE AT FAULT WITH EQUAL PROBABILITY. 


5.) IF THE FAILING wa PATTERNS DISPLAYED IN THE ‘AND' AND THE ‘OR’ 
DATA TYPED IN THE SUMMARY DOES NOT CONFORM EXPLICITELY TO 
ANY OF THE ABOVE PATTERNS, THEN THE TROUBLE SHOOTER MUST 
INTUITIVELY TRY TO FIND WHICH OF THE ABOVE CASES (1 THROUGH 4) 
IS A "BEST FIT* OF THE SYMPTOMS. 


. re ee ee ee ee 
i a 


ee. 


LAR RERAALASARAASASASALALASASASASARRARARARARAAASRASARASAS ASSESS SSS | 


011632 000004 1ST11: SCOPE 
2518 011634 170011 SETD :SET FD. 
2519 TEST ACCUMULATOR 0 WITH FLOATING ONE 
011636 012737 042244 001244 MOV #MAIUMO , aS TMPS 
011644 012737 011674 001236 MOV #G1,a#$TMP2 
011652 012700 014114 MOV #GPATOO RO 
011656 012701 014154 MOV #GDATOO.R1 
011662 104413 LPERR ;SET UP THE LOOP ON ERROR ADDRESS. 
011664 004737 013572 JSR PC ,a#GSETUP ;LOAD TEST PATTERN. 
011670 012703 000102 MOV #102,R3 
011674 G1: 
011674 172410 LDD (RO) ,ACO 
011676 174 STD ACO,ACO 
011700 172400 LDD ACO,ACO ;STORE THE TEST PATTERN. 
011702 174011 STD ACO, (R1) 
011704 004737 013670 JSR PC, a4GCMP :COMPARE THE DATA READ WITH 
[THAT WHICH WAS WRITTEN. 
011710 005737 014110 TST aAGFLAG1 
011714 901004 BNE G 
011716 005137 014110 COM @AGFLAG1 
011722 000261 SEC 
011724 000401 BR G3 
011726 000241 G2: CLC 
011730 006160 000006 G3: ROL 6(RO) :GENERATE THE NEXT TEST PATTERN, 
011734 006160 000004 ROL 4(RO) 
011740 006160 000002 ROL 2(RO) 
011744 006110 ROL (RO) 
011746 004737 013650 JSR PC ,a#GRESET :RESET DEFAULT PATTERN IN OUTPUT 
011752 077330 SOB R3,G1 
011754 004737 014006 JSR PC a#GSUM :TYPE ERROR SUMMARY. 
2520. ; TEST ACCUMULATOR 0 WITH FLOATING ZERO 
011760 012737 042244 001244 MOV AS TMPS 
011766 012737 012016 001236 MOV #64, aASTMP2 
011774 012700 014124 MOV #GPAT10,RO 
012000 012701 014154 MOV #GDATOO.R1 
012004 104413 LPERR ;SET UP THE LOOP ON ERROR ADDRESS. 
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01 
012070 
012074 


012076 
2521 


012150 
012154 


012210 
012212 


012216 


012220 
2522 


012244 


004737 
012703 
172410 


077330 
004737 


012737 


37 
012703 
172410 


oooo 
pe PP 


013572 
000102 


013670 
014110 
014110 


000006 
000004 
000002 
013650 
014006 
042252 
012140 
014114 
014154 


013572 
000102 


013670 
014110 
014110 


001244 
001236 


001244 
001236 
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JSR PC, a#GSETUP :LOAD TEST PATTERN. 
MOV #102,R3 


G4: 
LDD (RO) ,ACO 
STD ACO,ACO 
LDD ACO,ACO ;STORE THE TEST PATTERN. 
STD ACO, (R1) 
JSR PC, a@4GCMP COMPARE THE DATA READ WITH 
; THAT WHICH WAS WRITTEN. 
TST @AGFLAG1 
BNE 5 
COM @AGFLAG1 
CLO 
BR G6 
G5: SEC 
G6: ROL 6(RO) ; GENERATE THE NEXT TEST PATTERN. 
ROL 4(RO) 
ROL 2(RO) 
ROL (RO) 
JSR PC ,@4GRESET ZRESET DEFAULT PATTERN IN OUTPUT 
;BUFFER. 
SOR R3,G4 
JSR PC ,a4GSUM TYPE ERROR SUMMARY. 
ZTEST ACCUMULATOR j ith FLOATING ONE 
MOV ATANUM 1 , BAS TMPS 
MOV #G7, avsTMP2 
MOV #GPATOO, RO 
MOV #GDATOO.R1 
LPERR :SET UP THE LOOP ON ERROR ADDRESS. 
JSR PC ,@4GSE TUP LOAD TEST PATTERN. 
MOV #102,R3 
G7: 
LDD (RO) ,ACO 
STD ACO,AC1 
LDD AC1,ACO :STORE THE TEST PATTERN. 
STD ACO, (R1) 
JSR PC,a@4GCMP ; COMPARE THE DATA READ wITH 
Z THAT WHICH WAS WRITTEN. 
TST @4 GFLAG1 
BNE 10 
COM OAGFLAG1 
SEC 
BR G11 
G10: CLC 
G11: ROL 6(RO) GENERATE THE NEXT TEST PATTERN. 
ROL 4(RO) 
ROL 2(RO) 
ROL (RO) 
JSR PC, @A#GRESET ZRESET DEFAULT PATTERN IN OUTPUT 
;BUFFER. 
SOB R3,G7 


JSR PC ,@4GSUM ; TYPE ERROR SUMMARY. 
TEST ACCUMULATOR 1 WITH FLOATING ZERO 
MOV AMNUM $STMP5 


MOV #GDATOO.R1 


—A 
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2523 


2524 


012250 


012272 
012276 


012456 


012462 
012464 


012470 
012476 
012504 


104413 
004737 
012703 
172410 


077330 
004737 


012737 


37 
012703 
172410 

2 


013572 
000102 


013670 
014110 
014110 


000006 
000004 
000002 
013650 
014006 
042257 
012404 
014114 
014154 


013572 
000102 


013670 
014110 
014110 


000006 
000004 
000002 


013650 


014006 


042257 
012526 
014124 
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001244 
001236 


001244 
001236 


Gle: 


BR 
G13: SEC 


SOB 


JSR a4#GSUM 
: TEST ACCUMULATOR ox” WITH FLOATING ONE 
#MNUM2 , AS TMPS 


G15: 


G16: 


7 


@4GSUM 
; TEST ACCUMULATOR rx WITH FLOATING ZERO 
MOV AMNUM2 , MP5 


MOV 
MOV 


mM 5 
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PC ,a#GSETUP 
#102,R3 


ey 


PC ,@4GCMP 
@AGFLAG1 
G13 
@AGFLAG1 


( 
PC ,@#GRESET 
“¥ G12 


as 
#615, a4STMP2 
#GPATOO,RO 
#GDATOO.R1 


PC ,@#GSETUP 
#102,R3 
(RO) ,ACO 

2 
PC ,@4GCMP 


ae 
@4GFLAG1 


(R 
PC ,@4GRESET 
S. G15 


af $T 
#620, a#STMP2 
#GPAT10,RO 


;SET UP THE LOOP ON ERROR ADDRESS. 


;LOAD TEST PATTERN. 


Lo 


;STORE THE TEST PATTERN. 


COMPARE THE DATA READ WITH 
>THAT WHICH WAS WRITTEN. 


;GENERATE THE NEXT TEST PATTERN. 


;RESET DEFAULT PATTERN IN OUTPUT 
BUFFER. 


: TYPE ERROR SUMMARY. 


;SET UP THE LOOP ON ERROR ADDRESS. 


;LOAD TEST PATTERN. 


STORE THE TEST PATTERN. 


; COMPARE THE DATA READ WITH 
>THAT WHICH WAS WRITTEN. 


;GENERATE THE NEXT TEST PATTERN. 


RESET DEFAULT PATTERN IN OUTPUT 
BUFFER. 


TYPE ERROR SUMMARY. 
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ACCUMULATORS DATA PATTERNS TEST SEQ 0065 

012510 012701 014154 MOV #GDATOO,R1 

012514 104413 LPERR :SET UP THE LOOP ON ERROR ADDRESS. 

012516 004737 013572 JSR PC, a#GSETUP sLOAD TEST PATTERN. 

012522 012703 000102 MOV #102,R3 . 

012526 G20: 

012526 172410 LDD (RO) ,ACO 

012530 174002 STD ACO,AC2 

012532 172402 LDD AC2,ACO0 :STORE THE TEST PATTERN. 

012534 174011 STD ACO, (R1) 

012536 004737 013670 JSR PC, a4#GCMP :COMPARE THE DATA READ WITH 
‘THAT WHICH WAS WRITTEN. 

012542 005737 014110 TST a4GFLAGT 

012546 001004 BNE ° 

012550 005137 014110 COM SSGFLAGI 

012554 000241 CLC 

012556 000401 BR G22 

012560 000261 621: SEC 

012562 006160 000006 Ge2: ROL 6(RO) :GENERATE THE NEXT TEST PATTERN. 

012566 006160 ROL 4 (RO) 

012572 606160 000002 ROL 2(RO) 

012576 006110 ROL (RO) 

012600 004737 013650 JSR PC ,@AGRESET :RESET DEFAULT PATTERN IN OUTPUT 

012604 077330 SOB R3, 620 

012606 004737 014006 JSR @4GSUM - : TYPE ERROR SUMMARY. 

2525 S TEST ACCUMULATOR s WITH FLGATJNG ONE 

012612 012737 042264 001244 MOV AMNIUM3 , A'S TMPS 

012620 012737 012650 001236 MOV #623, a4$TMP2 

012626 012700 014114 MOV #GPATOO,RO 

012632 012701 014154 MOV #GDATOO.R1 

012636 104413 LPERR :5ET UP THE LOOP ON ERROR ADDRESS. 

012640 004737 013572 JSR PC ,a#GSETUP :LOAD TEST PATTERN. 

012644 012703 000102 MOV #102,R3 

012650 G23: 

012650 172410 LDD (RO) ACO 

012652 174003 STD ACO.AC3 

012654 172403 LDD AC3,ACO :STORE THE TEST PATTERN. 

012656 174011 STD ACO. (R1) 

737 013670 JSR PC, a#GCMP :COMPARE THE DATA READ WITH 

Z THAT WHICH WAS WRITTEN. 

012664 005737 014110 TST a#GFLAG1 

012670 001004 BNE 624 

012672 005137 014110 COM @AGFLAG1 

012676 000261 SEC 

012700 000401 BR 625 

012702 000241 G24: CLC 

012704 006160 000006 G25: ROL 6(RO) :GENERATE THE NEXT TEST PATTERN. 

012710 006160 000004 ROL 4 (RO) 

012714 006160 000002 ROL 2(RO) 

012720 006110 ROL (RO) 

012722 004737 013650 JSR PC, @#GRESET :RESET DEFAULT PATTERN IN OUTPUT 
BUFFER. 

012726 077330 SOB R3, G23 

012 004737 014006 JSR GSUM : TYPE ERROR SUMMARY. 

2526 s TEST ACCEMULATOR .r WITH FLOATING ZERO 
012734 012737 042264 001244 MOV #MAIUM3 , aS TMPS 
012742 012737 012772 001236 MOV #626, a#$TMP2 
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Nae FPI11F FLTG PNT PRT A MACRO M1111 
ACCUMULATORS DATA PATTERNS TEST SEQ 0066 
012750 012700 014124 MOV #GPAT10,RO 
012754 012701 014154 MOV #GDATOO.R1 
012760 1046413 LPERR ;SET UP THE LOOP ON ERROR ADDRESS. 
012762 004737 013572 JSR PC ,@4GSETUP ;LOAD TEST PATTERN. 
012766 012703 000102 MOV #102,R3 
012772 626: 
012772 172610 LDD (RO) ,ACO 
012774 174003 STD ACO,AC3 
012776 172403 LDD AC3, ; STORE THE TEST PATTERN. 
013000 © 4011 STD ACO, (R1) 
013002 004737 013670 JSR PC ,@4GCMP COMPARE THE DATA READ WITH 

Z THAT WHICH WAS WRITTEN. 
013006 005737 014110 TST @AGFLAG1 
013012 001 BNE 627 
013014 005137 014110 COM @4GFLAG1 
013020 000241 CLC 
013022 000401 BR 630 
013024 000261 G27: SEC 
013026 006160 000006 G30: ROL 6(RO) GENERATE THE NEXT TEST PATTERN. 
013032 006160 000004 ROL 4(RO) 
013036 006160 000002 ROL 2(RO) 
013042 006110 ROL (RO) 
013044 004737 013650 JSR PC, a#GRESET :RESET DEFAULT PATTERN IN OUTPUT 
013050 077330 S0B R3,626 
013052 004737 014006 JSR PC, a#GSUM ;TYPE ERROR SUMMARY. 
2527 sTEST ACCUMULATOR 4 WITH FLOATING ONE 
013056 012737 042273 001244 MOV ANNUM, , A'S TMPS 
013064 012737 013114 001236 MOV #631, a4STMP2 
013072 012700 014114 MOV #GPATOO,RO 
913076 012701 014154 V #GDATOO.R1 
013102 104413 LPERR ;SE1 UP THE LOOP ON ERROR ADDRESS. 
13104 004737 013572 JSR PC ,@4GSETUP ;LOAD TEST PATTERN. 
013110 012703 000102 MOV #102,R3 
013114 G31: 
013114 172410 LDD (RO) ,ACO 
013116 174004 STD ACO,AC4 
013120 172404 LDD AC4,ACO ZSTORE THE TEST PATTERN. 
013122 174011 STD ACO, (R1) 
013124 004737 013670 JSR PC, a4GCMP ; COMPARE THE DATA READ WITH 
Z THAT WHICH WAS WRITTEN. 
013130 005737 014110 TST @4GFLAG1 
013134 001004 BNE G32 
013136 005137 014110 COM Q4GFLAG1 
013142 2 SEC 
013144 000401 BR G33 
013146 000241 G32: CL 
013150 006160 000006 G33: ROL 6(RO) ;GENERATE THE NEXT TEST PATTERN. 
013154 006160 000004 ROL 4(RO) 
013160 006160 000002 ROL 2(RO) 
013164 006110 ROL (RO) 
013166 004737 013650 JSR PC ,a#GRESET :RESET DEFAULT PATTERN IN OUTPUT 
013172 077330 SOB R3,G31 
013174 004737 014006 JSR PC, a4GSUM TYPE ERROR SUMMARY. 
2528 ZTEST ACCUMULATOR 4 WITH FLOATING ZERO 

013200 012737 042273 001244 MOV AMM, , aS TMPS 

{ rF «& ] 
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ACCUMULATORS DATA PATTERNS TEST SEQ 0067 


013206 012737 013236 001236 MOV #634, a#SIMP2 
013214 012700 014124 MOV #GPAT10,RO 
013220 012701 014154 MOV #GDATOO.R1 
013224 104413 LPERR :SET UP THE LOOP ON ERROR ADDRESS. 
013226 004737 013572 JSR PC ,a#GSE TUP :LOAD TEST PATTERN. 
013232 012703 000102 MOV #102,R3 
013236 G34: 
1 172610 LDD (RO) ,ACO 
013240 174004 STD ACO,AC4 
013242 172404 LDD AC4,ACO :STORE THE TEST PATTERN. 
0132464 174011 STD ACO. (R1) 
013246 004737 013670 JSR PC, a#GCMP ;COMPARE THE DATA READ WITH 
‘THAT WHICH WAS WRITTEN, 
013252 005737 014110 TST @4GFLAG1 
013256 001004 BNE G35 
013260 605137 014110 COM @¥GFLAG1 
013264 000241 CLC 
013266 000401 BR 636 
013270 000261 G35: SEC 
013272 006160 000006 G36: ROL 6(RC) :GENERATE THE NEXT TEST PATTERN. 
013276 006160 000004 ROL 4(RO) 
13302 006160 000002 ROL 2(RO) 
013306 006110 ROL (RO) : 
013310 004737 013650 JSR PC, @#GRESET :RESET DEFAULT PATTERN IN OUTPUT 
013314 077330 SOB R3, G34 
013316 004737 014006 JSR a4GSUM : TYPE ERROR SUMMARY. 
2529 s TEST ACCUMULATOR “ WITH FLOATING ONE 
013322 012737 042301 001244 MOV AMNIUMS , 24'S TMPS 
013330 012737 013360 001236 MOV #637, a4$TMP2 
013336 012700 014114 MOV #GPATOO,RO 
013342 012701 014154 MOV #GDATOO.R1 
013346 104413 LPERR :SET UP THE LOOP ON ERROR ADDRESS. 
013350 004737 013572 JSR PC ,a#GSETUP :LOAD TEST PATTERN. 
013354 012703 000102 MOV #102,R3 


ing gO 
STORE THE TEST PATTERN. 
013670 JSR PC, a4GCMP COMPARE THE DATA READ WITH 

: THAT WHICH WAS WRITTEN. 
014110 OrGFLAGT 


014710 GAGF LAG 


























3410 

3412 : 

3414 006160 000006 G41: ROL 6(RO) ;GENERATE THE NEXT TEST PATTERN. 
3420 006160 000004 ROL 4(RO) 

3424 006160 000002 ROL 2(RO) 

3430 006110 ROL (RO) 

3432 004737 913650 JSR PC ,@#GRESET iF) mmeal PATTERN IN OUTPUT 
13436 077330 SOB R3,G37 

13440 004737 014006 JSR PC ,@4GSUM , ; TYPE ERROR SUMMARY. 


2530 :TEST ACCUMULATOR 5 WITH FLOATING ZERO 
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711 ACCUMULATORS DATA PATTERNS TEST SEQ 0068 
013444 012737 042301 001244 MOV AMNUMS , 24'S TMPS 
013452 012737 013502 001236 MOV #642, aASIMP2 
013460 012700 014124 MOV #GPAT10,RO 
013464 012701 014154 MOV #GDATOO.R1 
013470 104413 LPERR :SET UP THE LOOP ON ERROR ADDRESS. 
013472 004737 013572 JSR PC ,@4GSETUP ;LOAD TEST PATTERN. 
013476 012703 000102 MOV #102,R3 
013502 G42: 
013502 172410 LDD (RO) ACO 
013504 174005 STD ACO,AC5 
013506 172405 LDD AC5,ACO ;STORE THE TEST PATTERN. 
013510 174011 STD ACO, (R1) 
013512 004737 013670 JSR PC, aeGCMP ; COMPARE THE DATA READ WITH 
Z THAT WHICH WAS WRITTEN. 
013516 005737 014110 TST @A4GFLAG1 
013522 001004 BNE G43 
013524 005137 014110 COM Q4GFLAG1 
013530 000241 CLC 
013532 000401 BR G44 
013534 000261 G43: SEC 
013536 006160 000006 G44: ROL 6(RO) ;GENERATE THE NEXT TEST PATTERN. 
013542 006160 000004 ROL 4 (RO) 
013546 006160 000002 ROL 2(RO) 
013552 006110 ROL (RO) 
013554 004737 013650 JSR PC, @#GRESET :RESET DEFAULT PATTERN IN OUTPUT 
7BU ™ 
013560 077330 SOB R3,G42 
3531 013562 004737 014006 JSR PC ,a4GSUM sTYPE ERROR SUMMARY. 
S236 013566 000137 014166 JMP @4GDONE 
2534 SUSE ge & “wae * ay INITIALIZE ALL THE DATA BUFFERS. 
2535 013572 012705 014110 GSETUP: ELAGT, R5 
2536 013576 012704 000026 MOV #36 CR 
2537 013602 005025 1$: CLR ase 
013604 077402 SOB R4,1$ 
2540 013606 012705 014124 MOV #GPAT10,R5 
2541 013612 012704 000010 MOV #10,R4 
2542 013616 005125 2$: COM (R55+ 
2543 013620 077402 SOB R4,2$ 
2545 013622 020067 000266 GS1: CMP RO, GPATOO 
2546 013626 001401 BEQ 3$ 
547 013639 000207 RTS PC 
2549 013632 012705 014154 3$: MOV #GDATOO, R5 
2550 013636 012704 000004 MOV RG 
2551 013642 005125 L$: COM els 
2552 013644 077402 SOB R4,4$ 
2555 013646 000207 RTS PC 
2555 013650 012705 014154 GRESET: MOV #GDATOO,RS 
2556 013654 012704 000004 MOV #4 RG 
2557 013660 005025 1$: CLR (R5)+ 
2558 013662 077402 SOB R4,1$ 
2559 013664 000187 013622 MP aacs 


~m 
a= 










1 
2562 013670 012705 


ts 44 013714 000207 


1 
2572 013716 012637 
010003 


2595 014006 005737 
2596 014012 001435 


7 
2598 014014 aatene 


2610 014102 000177 
2611 014106 000207 
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014164 


014144 
000004 


014134 
000004 


014112 
001240 
014154 


000156 


014112 


MACRO M1111 


001242 


165116 
165106 
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C 
T 
:SEE IF THE DATA WRITTEN MATCHES THE DATA READ. 
GCMP: MOV #GDATOO,RS 
MOV #4 RG 
MOV RO,R2 
1$: CMP (R2)+,(RS)+ 
BEQ 2$ 
JMP OAGERRI 
es: SOB R4,1$ 
RTS PC 
= COME HERE TO REPORT AND RECORD ERRORS. 
GERRi: MOV (SP) +, @#GADR :SAVE THE RETURN ADDRESS. 
MOV RO,R SCOMPUTE 'OR' OF BAD DATA. 
MOV #GORO,RS 
MOV #4 RG 
1$: BIS (R3)+, (R5)+ 
SOB R4,1$ 
MOV RO,R3 :COMPUTE 'AND' OF BAD DATA. 
MOV AGANDO,RS 
MOV #4 RG 
2$: MOV (R3)+,R2 
COM 
BIC R2,(R5)+ 
508 “28 
INC @AGFLAG2 : INCREMENT ERROR COUNT. 
MOV RO, a#$TMP3 
MOV A#GDATOO, a#$TMP4 
3$: ERROR +44 
JMP @GADR 
:SEE IF ANY ERRORS HAVE OCCURRED AND WHETHER OR NOT AN ERROR SUMMARY 
> SHOULD BE TYPED. 
GSUM: TST @NGFLAG2 :ANY ERRORS? 
BEQ 3$ 
BT #SW13,aSuR : INHIBIT ERROR PRINT OUT? 
BIT #SW7,@SWR :PRINT SUMMARY? 
BEQ 3$ 
1$: MOV @AGFLAG2, a#$TMP6 :YES PRINT SUMMARY. 
MOV #GANDO, a $TMP3 
MOV #GORO, a4$TMP4 
MOV (SP) +. a#GADR :SAVE RETURN ADDRESS. 
MOV #2$,, AASERRPC 
MOVB «#45. a4$1TEMB 
2$: JSR PC, aMERTYPE 
IMP @GADR 
3$: RTS PC 


| 


PAAO FP11F FLTG PNT PRT A 
ACCUMULATORS DATA PATTERNS TEST 


64 
2641 014162 
2643 014164 


2645 014166 
014166 


014170 
2655 014172 
2656 
2657 014174 


soee 014216 


177777 
177777 
177777 
177777 
177777 
177777 
177777 
177777 
000000 
000000 
000000 
000000 


000000 


104412 


077302 


014720 
014722 
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GFLAG1: 
GFLAG2: 


GPATOO: 
GPATO1: 
GPATO2: 
GPATO3: 


GDATO2: 
GDATO3: 


GADR: 
GDONE : 


oOo OOOO WOOO 


RSE TUP 


SEG 0070 


;SEE IF THE USER HAS EXPRESSED 

; THE DESIRE TO CHANGE THE SOF TWARE 
;VIRTUAL CONSOLE SWITCH REGISTER (HAS 
; THE USER TYPED CONTROL G?). 


WEARER RRR RRR RRR ER RRR RRR RRR RR RE RRR RRR RRR RR RRR RRR RRR ASR RRR D ESD | 


SaTEST 12 
-* 


FPP ACCUMULATORS DUAL ADDRESS TEST 


S*THIS TEST PERFORMS A DUAL ADDRESSING TEST ON THE FLOATING ACCUMULATORS. 
7*NOTE THAT ACCUMULATOR ZERO IS USED TO ACCESS ALL THE OTHERS. 
** 


Wh beep eee ee RRRRSESRRASRERRRRRRRRR RRR RR RR RRR RRR RRR RRR RRR SRR RAR SEES | 


TS112: 


H1: 


He: 


@AHF LAG 
#HAIW,RO 
#HDAT1,R1 


#24,R 
(R1)+,(RO)+ 
R3,H2 


;SET UP THE LOOP ON ERROR ADDRESS. 


:GO INITIALIZE THE FPS AND STACK; AND 
SINITIALIZE THE LOAD BUFFER DATA, 


ia ee 


“amo 


| eaten FPIIF FLTG PNT PRT A MACRO M1111 
T12 FPP ACCUMULATORS DUAL ADDRESS TEST 
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SEQ Cc aon oot | 


;CLEAR THE OUTPUT DATA BUFFER. 


3GO READ ALL ACCUMULATORS BACK. 
;SEE IF DATA IS CORRECT. 


; COMPLIMENT EACH WORD OF THE DATA STORED IN ACCUMULATOR 1, 


RELOAD THAT ACCUMULATOR, READ ALL THE ACCUMULATORS BACK AND CHECK 


READ ALL THE ACCUMULATORS BACK, 
7 CHECK THE DATA, 


S Re, 
; COMPLIMENT EACH WORD OF THE DATA STORED IN ACCUMULATOR 2 


;RELOAD THAT ACCUMULATOR, READ ALL THE ACCUMULATORS BACK AND CHECK 


READ ALL THE ACCUMULATORS BACK. 
ZCHECK THE DATA, 


SOB Re, 
COMPLIMENT EACH WORD OF THE DATA STORED IN ACCUMULATOR 3 


3 ge THAT ACCUMULATOR, READ ALL THE ACCUMULATORS BACK AND CHECK 
3TH 


266% 014220 004767 000422 JSR PC HOLA 
2666 014224 170011 H3: SETD 
2667 ZLOAD ACCUMULATOR 1 
014226 012700 014722 MOV #HAIW,RO 
014232 172410 LDD (RO) ,ACO 
014234 174001 STD ACO,AC1 
;LOAD ACCUMULATOR 2 
014236 012700 014732 MOV #HA2W RO 
014242 172610 LDD (RO) ,ACO 
014244 174002 STD ACO,AC2 
ZLOAD ACCUMULATOR “ 
014246 012700 014742 #HA3W RO 
014252 1726410 (DD (RO) ,ACO 
014254 174003 STD ACO,AC3 
2670 :LOAD ACCUMULATOR 4 
014256 012700 014752 MOV #HAGW,RO 
014262 172410 LDD (RO) ,ACO 
014264 174004 STD ACO.AC4 
2671 :LOAD ACCUMULATOR 5 
014266 012700 014762 MOV #HASW,RO 
014272 172410 LDD (RO) ,ACO 
—_ 014274 174005 STD ACO,ACS 
2673 014276 004737 014532 Hd : JSR PC, a@#HSTD 
2675 014302 004737 014610 JSR PC, a@#HCMP 
2677 
7 THE DATA, 
014306 012700 014722 MOV #HAIW.RO 
014312 012702 000004 MOV #4 ,R2 
014316 010001 MOY RO,R1 
014320 005121 H5: COM (Ri)+ 
014322 172410 LDD (RO) ,ACO 
014324 174001 STD ACO,AC1 
014326 004737 014532 JSR PC, a#HSTD 
014332 004737 014610 JSR PC, @#HCMP 
014336 077210 0B H5 
2678 
>THE DATA. 
014340 012700 014732 MOV #HA2W RO 
014344 012702 000004 MOV #4 ,R2 
014350 010001 MOV RO,R1 
014352 005121 H6: COM (Ri)+ 
014354 172410 LDD (RO) ,ACO 
014356 174002 STD ACO,AC2 
014360 004737 014532 JSR PC, a#HSTD 
014364 004737 014610 JSR C a#HCMP 
014370 077210 H6 
2679 
TA. 
014372 012700 014742 MOV #HASW RO 
014376 012702 000004 MOV #4 R2 


T12 
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READ ALL THE ACCUMULATORS BACK. 
; CHECK THE DATA, 


SOB R2,H 
> COMPLIMENT EACH WORD OF THE DATA STORED IN ACCUMULATOR 4, 
RELOAD THAT ACCUMULATOR, READ ALL THE ACCUMULATORS BACK AND CHECK 


READ ALL THE ACCUMULATORS BACK. 
;CHECK THE DATA, 


SOB Re, 
COMPLIMENT EACH WORD OF THE DATA STORED IN ACCUMULATOR 5, 
:RELOAD gs ACCUMULATOR, READ ALL THE ACCUMULATORS BACK AND CHECK 


CKFPAAO FP11F FLTG PNT PRT A MACRO M1114 
FPP ACCUMULATORS DUAL ADDRESS TEST 
014402 010001 MOV RO,R1 
014404 005121 47: COM (Ri)+ 
014406 1724610 LDP (RO) ,ACO 
014410 174003 STD ACO,AC 
014412 737 014532 JSR PC ,a#HSTD 
014416 737 014610 JSR PC. aHCMP 
014422 077210 
2680 
3 THE DATA, 
014424 012700 014752 MOV #HAGW,RO 
014430 012702 000004 MOV #4,R 
014434 010001 MOV RO.R1 
014436 005121 H10: COM (Ri)+ 
014440 172410 LDD (RO) ,ACO 
014442 176004 STD ACO,AC4 
014444 004737 014532 JSR PC, @#HSTD 
014450 004737 014610 JSR PC. a#HCMP 
014454 077210 H10 
2681 
*THE DAT 
014456 012700 014762 OV #HASW,RO 
014462 012702 000004 MOV #4 R2 
014466 010001 MOV RO,R1 
014470 005121 H11 COM (Ri)+ 
014472 172610 LDD (RO) ,ACO 
014474 174005 STD ACO,AC5 
014476 004737 014532 JSR PC Q#HSTD 
014502 004737 014610 JSR PC; a#HCMP 
ee 014506 077210 SOB R2,H11 
2683 014510 005737 014720 TST @sHF LAG 
2684 014514 001402 BEQ H12 
685 014516 000137 015112 JMP @AHDONE 
2687 014522 005137 014720 H12: COM a@#HF LAG. 
2688 014526 000137 014224 JMP aH 
2690 : STORE ALL ACCUMULATORS I 
2691 014532 004737 014646 HSTD: JSR PC, a#HCLR 
2692 :STORE ACCUMULATOR 1 
014536 012704 014772 MOV MHAIR,RS 
014542 172401 LDD AC1,ACO 
014544 176014 STD ACO. (R4) 
2693 :STORE ACCUMULATOR 2 
014546 012704 015002 MOV HHADR RS 
014552 172402 LDD AC2,ACC 
014554 176014 STD ACO. (R4) 
269% ZSTORE ACCUMULATOR $3 
014556 012704 015012 MOV MHA3R RS 
014562 172403 LOD AC3,AC0 
014564 174014 STD ACO. (RG) 
2695 ;STORE ACCUMULATOR 4 
014566 012704 015022 MOV MHALR RG 
014572 172604 LDD AC4,ACO 
016574 176014 STD ACO, (RG) 


ZREAD ALL THE ACCUMULATORS BACK. 
i; CHECK THE DATA. 


N THE OUTPUT ag 


CLEAR ALL OUTPUT BUFFERS. 


SEQ 0072 


—~o 


CK 


96 
01 4576 


2726 014712 


8 
2729 014716 
2730 014720 


1 
2732 014722 


014770 
2737 
2738 014772 
015000 
2739 015002 
01501 
2740 015012 
15 


015020 
2741 015022 


KF+ AAO FRTTIF FLTG PNT PRT A 
tte FPP ACCUMULATORS DUAL ADDRESS TEST 


150 %e 


014716 


014772 
000024 


014722 


000010 
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000000 
000000 
000000 
000000 
000000 


000000 
000000 
000000 
000000 


;STORE ACCUMULATOR 5 


MOV #HASR RS 
LDD AC5,ACO 
STD acO, (R4) 
RTS 
1S ng DATA LOADED WITH DATA READ. 
HCMP MOV (SP) +,@4HADR 
MOV ieee *R3 
MOV #HAIR,RS 
MOV #24,R 
H(MP1: (CMP (R3)+,(R4)+ 
BEQ HCMP2 
JMP @AHERROR 
HCMP2: SOB R5,HCMP1 
JMP @HADR 
;CLEAR THE DATA OUTPUT SUFFER. 
HCLR: MOV MHAIR,RS 
MOV #24,R5 
HCLR1: CLR (R4)+ 
SOB R5.HCLR1 
RTS PC 
;REPORT ERROR. 
HERROR: 
MOV #HAIW,RS 
MOV #STMP2 RS 
MOV #12,R5 
1$: MOV R3,(R4)+ 
ADD #10,R3 
SOB R5,1$ 
2$: ERROR +46 
JMP @AHDONE 
HADR: 0 
HFLAG: 0O 
HA1W -WORD 0,0,0.0 
HA2W . WORD 0,0,0.0 
HA 3W «WORD 0,0,0.0 
HAW -WORD 0,0.0.0 
HASW «WORD 0,0,0.0 


0,0,0.0 
0.0.0.0 
0.0.0.0 


SAVE RETURN ADDRESS. 


SEQ 0075 





4 






















015030 
2742 015032 
015040 
2743 
2744 015042 
015050 
2745 aE ty 
2746 O1 2086 
2747 015072 
015100 
2748 015102 


2749 
2750 


Vw ww 
ahah ab 
in wl 
mr oOo 


2760 


ins) 
N 
NO 
ooo C0O OCCOOoO OO 
a ahabated atab at 








073567 


172410 
012737 


012700 
012737 
005003 
172407 
170000 
005203 
005203 


012701 
174011 


012701 
012702 
012703 


ene FPIIF FLTG PNT PRT A 
Tie FPP ACCUMULATORS DUAL ADDRESS TEST 


000000 


073567 
063146 
010421 
031463 
042104 


015626 


015326 


000001 


015536 


015636 


015636 
015626 


000004 


MACRO M1111 


000000 


073567 
063146 
010421 
031463 
042104 


000244 


000004 


HASR: 


HDAT1: 
HDAT2: 
HDAT3: 
HDATS: 
HDATS: 


HDONE 


Whee ASAE RRERRARAREASE RAR SRARASRRASAR RARE ARRAS ESR RA RAR ARS ARRAS ES SS 


:*TEST 13 


WEA AARERRERR RRR SARARRRERAR ARRAS RR RR RRR RA RRR RRR RAR RRR RRR ASRS RSS SS SS 


TS113: 


Sis 


SCOPE 





J. 6 
26-SEP-79 09:38 PAGE 13-4 


0.0.0.0 


SEQ 0074 


73567 ,73567,73567,73567 
63146,63146,63146,63146 
10421,10421,10421,10421 
31463, 31463, 31463, 31463 
42104 ,42104 ,42104,42104 


FSRC MODE O WITH ILLEGAL ACCUMULATOR TEST 


Te THIS IS A TEST OF FSRC MODE 0 WITH ACCUMULATORS 6 AND 7. USE OF 

7*EITHER OF THESE NON-EXISTENT ACCUMULATORS SHOULD RESULT IN A TRAP TO 244 
*WITH FEC=2 (ILLEGAL FPP INSTRUCTION). 

** 


#SPAT10,RO 
(RO) ,ACO 


MSERRO, @AFPVECT 


#1,R0 


ASERR1 , @AERRVE CT 
R3 


AC7,ACO 


R3 
R3 


#SDATOO,R1 
ACO, (R1) 


#°EDATOO,R1 
#SPAT10,R2 
#4 ,R3 





;THE DESIRE TO CHANGE THE S 
;VIRTUAL CONSOLE SWITCH REGISTER (HAS 
; THE USER TYPED CONTROL G?). 


3GO INITIALIZE THE FPS AND STACK; AND 
;SEE IF THE USER HAS EXPRESSED 


7SET uP eT ey ON ERROR ADDRESS. 
;LOAD ACO 


sUSE OF THE NON-EXISTENT AC- 
;CUMULATOR SHOULD RESULT IN 

A TRAP TO 244. 

zA FAILURE IN THE FSRC FLOWS 
TWILL RESULT IN AN ODD ADDRESS 
+ TRAP TO 4. 


NO TRAP OCCURRED! ! 
[SEE IF ACO WAS MODIFIED. 






aA 


K_ 6 
CKFPAAO FP11F FLTG PNT PRT A MACRO M1111 26=SEP=79 09:38 PAGE 13-5 
113 FSRC MODE O WITH ILLEGAL ACCUMULATOR TEST SEQ 0075 
2785 015204 022122 $5: CMP (R1)+,(R2)+ 
ies 015206 001402 BEQ S 
787 015210 000137 015466 JMP @ASERR2 
fh 015214 977305 S6: SOB 3,85 
ia 015216 000137 015512 JMP @ASERR3 
2792 NOW TEST AC6. 
2793 015222 §7: 
015222 104413 LPERR SET UP THE LOOP ON ERROR ADDRESS. 
ee 015224 170011 SETD 
2796 015226 012700 015626 MOV #SPAT10,RO ;LOAD ACO 
fads 015232 172410 LDD (RO) ,ACO 
2799 015234 012737 015404 000244 MOV ASERRS , @AFPVECT 
2890 015242 012700 000001 MOV #1,R 
2801 015246 012737 015570 000004 MOV ASERRS ,AMERRVECT 
as 015254 005003 CLR R3 
2804 015256 172406 S8 LDD AC6,ACO 
2805 015260 17 $9 CFCC 
2806 015262 005203 INC R3 
p44 015264 005203 $10: INC R3 
2809 015266 012701 015636 MOV #SDATOO,R1 
sore 015272 174011 STD ACO, (R1) NO TRAP! GET ACO. 
2812 015274 012701 015636 MOV #SDATOO,R1 WAS ACO MODIFIED. 
2813 015300 _012702 015626 MOV ASPAT10,R2 
2814 615304 -012703 000004 MOV #4 ,R3 
2815 015310 022122 $11: CMP (R1)+,(R2)+ 
2816 015312 00140 BEQ $12 
2817 015314 000137 015500 JMP @4SERR6 
2818 015320 077305 S12: SOB R3,S11 
84 01532 137 015524 JMP @ASERR7 
2821 ; TRAPPED TO 244. 
2822 015326 021627 015154 SERRO: CMP (SP) ,AS3 3PC OF TRAP CORRECT? 
2823 015332 001402 BEQ 1$ 
case 015334 000137 040234 JMP a4F PSPUR 
oBoe 015340 012737 015222 015622 1$: MOV #S7 ,@ASADR 
2828 015346 011637 001236 SERR10: MOV (SP) ,aASTMP2 
2829 015352 022626 CMP (SP) +, (SP) + 
2830 015354 005004 CLR 4 
2831 015356 170204 STFPS R4 71S FPS CORRECT? 
2832 015360 022704 100200 CMP #100200,R4 
oth 015364 001020 BNE SERR15 
2835 01 5004 CLR R4 
2836 015370 170304 STST R4 1S FEC CORRECT? 
2837 015372 022704 900002 CMP #2,R4 
2838 015376 001023 ' BNE SERR20 
2839 015400 177 000216 JMP @SADR 


2840 


— eo 


6 
—_ 09:38 PAGE 53-6 


CKF PAAO FPLIF FLTG PNT PRT A MACRO M1111 
113 FSRC MODE O WITH ILLEGAL ACCUMULATOR TEST 
2841 015404 021627 015260 SERRG: CMP (SP) ,#S9 
2842 015410 001402 BEQ 1$ 
2843 015412 137 040234 JMP af PSPUR 
2844 015416 012737 015646 015622 158: MOV #SDONE , AA SADR 
845 015424 000750 BR SERR10 
2847 ;REPORT FPS FAILURE: 
2848 015426 012737 100200 001242 SERR15: MOV #100200, aaSTMP4 
2849 015434 010437 001240 MOV R4, BASTMP3 
2850 015440 106117 1$: ERROR +117 
2851 015442 000177 000154 JMP @SADR 
2853 :REPORT FEC BAD: 
2854 015446 012737 000002 001242 SERR20: MOV #2, QASTMPS 
2855 015454 010437 001240 MOV RG. AS TMP3 
2856 015460 104120 1$: ERROR +120 
2857 015462 000177 000134 JMP @SADR 
2858 
2859 
2 :ACO WAS MODIFIED. (BUT FSRC) FORK FAILED. 
2861 015466 012737 015152 001236 SERR2: MOV #S2,a4STMP2 
2862 015474 104112 1$: ERROR +117 
2863 015476 000463 BR SDONE 
2864 015500 012737 015256 001236 SERR6: MOV #S8, aASTMP2 
2865 015506 104114 1$: ERROR +114 
2866 015510 000456 BR SDONE 
2868 015512 012737 015152 001236 SERR3: MOV #S2,a4STMP2 
2869 015520 104111 1$: ERROR +111 
2870 015522 000451 BR E 
2871 015524 012737 015256 001236 SERR7: MOV #S8, a#STMP2 
2872 015532 104113 1$: ERROR +113 
2873 015534 000444 BR SDONE 
2875 :FAILURE OF (BUT FSRC) CAUSED AN ODD ADDRESS TRAP TO 4 
2876 015536 021627 015154 SERR1: CMP (SP) ,#S3 :DID TRAP OCCUR ON TESTED INSTRUCTION? 
2877 015542 001405 BEQ 1$ 
2878 015544 021627 015160 CMP (SP) .AS4 
2879 015550 001402 BEQ 1$ 
2880 015552 137 040266 JMP a#CPSPUR 
2882 015556 011637 001236 1$ MOV (SP) , a#$STMP2 
2883 015562 022626 CMP (SP)+, (SP)+ 
2884 015564 104115 2$: ERROR +115 
2885 015566 000427 BR SDONE 
2887 015570 021627 015256 SERRS: CMP (SP) .#S8 :DID TRAP OCCUR ON TEST INSTRUCTION? 
015574 001405 EQ 1$ 
889 015576 021627 015260 CMP (SP) #S9 
2890 015602 001402 BEQ 1$ 
2891 015 000137 040266 JMP aaCPSPUR 
2893 015610 011637 001236 1$: MOV (SP) ,a#STMP2 
2894 015614 022626 CMP (SP)+, (SP)+ 
2895 015616 104116 2$: ERROR +116 
2896 015620 000412 BR SDONE 


SEQ 0076 





1 


6 
CKF PAAO wah FLTG PNT PRT A MACRO M1111 A al 09:38 PAGE 13.9 
113 FSRC MODE 0 WITH ILLEGAL ACCUMULATOR T SEQ 0077 


2898 015622 000000 SADR: 
2899 015624 
2900 015626 


SPAT10: 
2901 015630 SPAT11: 
2902 015632 SPAT12: 
2903 015634 042104 SPAT13: 
2904 

2905 015636 

2906 015640 

SDATOS: 


SDONE : i 
104412 GO INITIALIZE THE FPS AND STACK; AND 
;SEE IF THE USER HAS EXPRESSED 
;THE DESIRE TO CHANGE THE SOF TWARE 
* VIRTUAL CONSOLE SWITCH — (HAS 
; THE USER TYPED CONTROL G?) 


5 LAA REREREERARAREREERAEARERRERERERREEREARRARRERREREERRRRRE 


pat 14 FSRC MODE 2 TEST 


:* THIS IS A TEST OF FSRC MODE # Seats 
;* INCREMENT MODE. 
3* 


SUI IOIOIIOIIUIISIUIOISIUIOIOIOIIOIOISIOIODIOIOIOIUIOIIOIOIIOIOIOIOIDIIOIOIIIOIOIIOIOIOI I 
015650 000004 TSr14: SCOPE 
34h 4 015652 104413 LPERR ;SET UP THE LOOP ON ERROR ADDRESS. 


2921 015654 Jl: 
2922 015654 170011 SETD ;SET DOUBLE MODE 


2923 
2924 015656 012700 016132 #JDATO,RO 
2925 015662 172410 (RO) ,ACO ;LOAD ACO 


2926 

2927 015664 012700 016112 #JDATIO,RO 

2928 015670 005003 R 

oo 015672 012737 015762 000004 AJERRO,a#ERRVECT 


29 
2931 015700 172420 : (RO) +, ACO TEST INSTRUCTION 
2932 015702 : R3 
ath, 015704 : R3 


29 
2935 015706 012701 016122 MOV #JDATOO,R1 
174011 ACO, (R1) PICK UP RESULTS 


016102 RO, AJBUF 0 WAS 

1$ < DECREMENT MO MECUTED? 
JERR1 

012702 : #JDATIO,R2 :I1S DATA CORRECT? 

012703 #JDATOO.R3 

12704 000004 #4 RG 

(Re) +, (R3)+ 
J 


JERR2 
R4,J5 








N 6 
owe FP11F FLTG PNT “ed 4 MACRO M1111 26=SEP=79 09:38 PAGE 13-8 


114 FSRC MODE 2 TEST SEQ 0078 
2949 
2950 015750 022700 016122 CMP MJDATIO+10,RO ;WAS RO INCREM. 
2951 015754 001401 BEQ J7 BY 10 (OCTAL) 
$328 015756 000424 BR JERR1 
$o2e 015760 000470 J7: BR JDONE 
$328 31F A TRAP THROUGH 4 OCCURS COME HERE 
2958 015762 021627 015702 JERRO: CMP (SP) ,MJ3 SEE IF THE TRAP 
2959 015766 001405 BEQ J10 sOCCURRED ON THE 
2960 015770 021627 015704 CMP (SP) ,AJ4 TESTED INSTRUCTION 
2961 015774 001402 BEQ J10 
sock 015776 000137 040266 JMP @4CPSPUR 
2964 016002 012737 000762 601240 J10: MOV #762 ,@ASTMPS REPORT FSRC FLOW 
2965 016010 012737 000322 001242 MOV #322 ,QASTMPS 3FAILURE 
2966 016016 011637 001236 MOV (SP) ,@#$TMP2 
2967 016022 022626 CMP (SP) +, (SP)+ 
2968 016024 104052 1$: ERROR +52 
3544 016026 000445 BR JDONE 
2971 016030 JERR1: REPORT, RO NOT 
2972 016030 012737 015700 001236 MOV #J2,aASTMP2 TCORRECTLY AFFECTED 
2973 016036 010037 001240 MOV RO, a#$TMP3 
2974 016042 012737 016122 001242 MOV #JDATIO+10,a4$TMP4 
2975 016050 104053 1$: ERROR +53 
os 016052 000433 BR JDONE 
2978 REPORT DATA FAILURE 
2979 
2980 016054 JERR2: 
2981 016054 012737 015700 001236 MOV #J2,QASTMP2 
2982 016062 012737 016112 001240 MOV #IDATIO, aS TMP3 
2983 016070 012737 016122 001242 MOV MJDATOO, aA STMPS 
2984 016076 104054 1$: ERROR +54 
3344 016100 000420 BR JDONE 
2987 016102 010421 JBUFO: .WORD 010421 
2988 016104 021042 JBUF 1: 021042 
2989 016106 042104 JBUF 2: 042104 
340 016110 031463 JBUF 3: 031463 
2992 016112 052525 JDATIO: 052525 
2993 016114 114631 JDATI1: 114631 
2994 016116 063146 JDATI2: 063146 
3444 016120 073567 JDATI3: 073567 
2997 016122 000000 JDATOO: 0 
2998 016124 000000 JDATO1: 0 
2999 016126 000000 JDATO2: 0 
Soe 016130 000000 JDATO3: 0 
3002 016132 177777 JDATO: 1 
3003 016134 177777 JDAT1: 1 
3004 016136 177777 JDATe: -1 


3005 016140 177777 JDAT3: ~1 


8 
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114 FSRC MODE 2 TEST SEQ 0079 
3007 
3008 016142 JDONE : 
016142 104412 RSE TuP ;GO INITIALIZE THE FPS AND STACK; AND 
SEE IF THE USER HAS EXPRESSED 


THE DESIRE TO CHANGE THE SOF TWARE 
SVIRTUAL CONSOLE SWITCH REGISTER (HAS 
;THE USER TYPED CONTROL G?). 


3009 
3016 
3017 FF RARAAAARAAARAARAARARERAEARARARERRARARAREARRARRARAREARARRRAREAHRE 
s*TEST 15 FSRC MODE 4 TEST 
:* 
:* THIS IS A TEST OF FSRC MODE 4, AUTO 
_ DECREMENT MODE. 
RRR ARAAAEARKARAARARAAREERARAARARAARAERARAAARARARRERRAHREAAEREAEHEAREERAEE 
016144 000004 TST15: SCOPE 
ie 016146 104413 LPERR zSET UP THE LOOP ON ERROR ADDRESS. 
3020 016150 K1: 
3021 016150 170011 SETD ;SET DOUBLE MODE 
3023 016152 012700 016424 MOV #KPATO,RO 
3024 016156 172410 LDD (RO) ,ACO ;LOAD A DEFAULT 
3025 sPATTERN INTO ACO 
3026 016160 012700 016404 MOV #KBUF 0,RO 
3027 016164 005003 CLR R3 
3028 016166 012737 016256 000004 MOV #KERRO, @AERRVECT 
3030 016174 172440 Ke: LDD -(RO) ,ACO ZTEST INSTRUCTION 
3031 016176 005203 K3: INC R3 
3032 016200 005203 k4: INC R3 
3034 016202 012701 016414 MOV #KDATOO,R1 
oH 016206 174011 STD ACO, (R1) sPICK UP THE RESULT 
3037 016210 020027 016414 CMP RO, AKBUF 0+10 :WAS AN AUTO 
3038 016214 001001 BNE 1$ cUNCREMENT EXECUTED 
3059 016216 000441 BR KERR1 
3041 016220 012702 016374 1$: MOV AKDATIO,R2 :1S DATA CORRECT? 
3042 016224 012703 016414 MOV AKDATOO,R3 
3043 016230 012704 000004 MOV #4 RG 
3044 016234 022223 KS: CMP (R2)+, (R3)+ 
3045 016236 001401 BEQ K6 
3046 016240 000442 BR KERR2 
3047 016242 077404 K6: S0B R4,K5 
3049 016244 022700 016374 CMP AKBUF 0-10,R0 yWAS RO DECREMENTED 
3050 016250 001401 BEQ K7 : PROPERLY? 
3051 016252 000423 BR KERR1 
3055 016254 000467 K7: BR KDONE 
3055 ; TRAP TO HERE ON AN ODD ADDRESS ERROR 









¢ 7 
CKF PAAO sah y FLTG PNT he 4 MACRO M1111 26-SEP-79 09:38 PAGE 13-10 
115 FSRC MODE 4 TEST SEQ 0080 


016176 KERRO: (SP) ,#k3 ;SEE IF THE ERROR 
K10 OCCURRED AT THE 

so ; INSTRUCTION TESTED. 

K 

@4CPSPUR 

































3063 016276 012737 000762 001240 Kk10: MOV #762 ,@ASTMP3 ;REPORT FAILURE IN 
3064 016304 012737 000324 001242 MOV #324 ,QASTMPS sFSRC FLOWS 

3065 016312 011637 001236 MOV (SP) ,@#STMP2 

3066 016316 104055 1$: ERROR +55 

ten 016320 000445 BR KDONE 


3069 016322 : ;REPORT, RO 

3070 016322 012737 016174 001236 MOV MK2 , ASTMP2 ; INCORRECTLY AFFECTED. 
3071 016330 010037 001240 MOV RO, a#$TMP3 

3072 016334 012737 016374 007242 MOV AMKDATIO, @A#$STMP4 

3073 016342 104056 1$: ERROR +56 

el 016344 000433 BR KDONE 


OF REPORT DATA FAILURE 


3079 016346 012737 016174 001236 MOV #K2 ,AASTMP2 
3080 016354 012737 016374 001240 MOV M#KDATIO, a#STMP3 
3081 016362 012737 016414 001242 MOV MKDATOO ,a@#$TMP4 
3082 016370 104057 1$: ERROR +57 

az 016372 000420 BR KDONE 


3085 016374 052525 KDATIO: .WORD 052525 
3086 016376 114631 KDATI1: 114631 
3087 016400 063140 KDATI2: 063140 
sia 016402 073567 KDATI3: 073567 
3090 016404 010421 KBUF 0: 010421 

016406 031463 KBUF 1: 031463 
3092 016410 042104 KBUF 2: 042104 


3093 016412 021042 KBUF 3: 021042 
3095 016414 000000 KDATOO: 0 


3096 016416 000000 KDATO1: 0 
3097 016420 000000 KDATO2: 0 
tae 016422 000000 KDATO3: 0 









3100 016424 177777 KPATO: -1 
3101 016426 177777 KPAT1: =] 
3102 016430 177777 KPAT2: 1 
soz 016432 177777 DPAT3: -1 
3105 016434 KDONE : 
0164 104412 RSE TUP :G0 INITIALIZE THE FPS AND STACK; AND 





; SO 
: VIRTUAL CONSOLE SWITCH + aa (HAS 
; THE USER TYPED CONTROL G?) 


CF AARAAAAAAAEAAAAARAEKARAAAAAAARAAAARARARARAERAAAARARAARRAEARHH EAHA 


CKFPAAO FP11F FLTG PNT PRT A 


FSRC MODE 2, WITH FD=0, TES 


3125 016462 
126 


312 

3127 016466 
3128 016470 
3129 


3130 016472 
3131 016476 
3132 016500 
3133 

3134 016502 
3135 016504 
3136 

3137 016506 
3138 016506 
3139 

3140 016510 
3141 016514 


3142 

3143 016516 
3144 016522 
3145 016524 


3146 

3147 016526 
3148 016534 
3149 016542 
016546 
016552 


016556 


KRAVIS SSVFARAUNV LS 
So 


000004 
104413 


170011 


012700 
172410 


012702 


012120 
077202 


012700 


172420 
005203 
170011 


012701 
174011 


020027 
001401 
000421 


012737 


016712 


016734 
016722 
000004 


016734 


015746 


016740 


177777 01674 
016 


016502 001236 
00124 
016740 001242 


er m1111 


:8TES 
-* FD= 
** 

S116: 


T 


L¥¢ 


D 
26-SEP-79 09:38 PAGE 13-11 


T 16 


SEQ 0081 


FSRC MODE 2, WITH FD=0, TEST 


0. (AUTO INCREMENT) 


SCOPE 
LPERR 


#LPAT10,RO 
(RO) ACO 


#LDATIO,RO 
#LPAT20,R1 
#4,R2 


(R1)+,(RO)+ 
2.1$ 


#LDATIO,RO 
R3 


(RO) +,ACO 
R3 


#LDATOO,R1 
ACO, (R1) 


RO,ALDATI2 
1$ 

LERR1 

#-1 ,AALDATI2 
#-1 ,@ALDATI3 


MLDATIO,R2 
#LDATOO,R3 


’ 


+ Nadi: (R3)+ 


LERR2 
R4,L5 


L DONE 


#L2,a4$TMP2 
MP3 


,aA$T 
MLDATI2, aA#$TMP4 
+6C 


;* THIS IS A TEST OF FSRC MODE 2 WITH 


'WeEAAARRARARRBRASARASRSAARASASRRSAAR ERA SERA R RARER ARR RRR RAR RASA RASS SS S| 


SET UP THE LOOP ON ERROR ADDRESS. 
SET DOUBLE MODE 


;LOAD ACO 
;SET UP THE INPUT 
DATA 


CLEAR FD. 


ZSET FD 
zPICK UP RESULTS 


WAS RO INCREMENTED 
; CORRECTLY BY 4 


71S DATA CORRECT 


;REPORT FAILURE 
RO - INCREMENTED 


:BY 4 









at FP11F FLTG PNT PRT A 


FSRC MODE 2, WITH FD 0, 


16612 


16714 
16716 


3203 016752 
3204 016754 
3205 


3206 016756 
016756 


000461 


012737 
012737 
012737 
104061 
000446 
012702 


177777 


052525 
114631 
06 

073567 


016502 
016734 
016750 


MACRO 1111 


TEST 


001236 
001240 
001242 





LERR3: 


2$ 


LPAT10 
LPAT11 
LPAT12 
LPAT13 


LPAT20 
LPAT21 
LPAT22 
LPAT23 


LDATIO 
LDATI1 
LDATI2 
LDATI3 


DATOO 


LDATO3 
L DONE 


._¢* 
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WORD 


WORD 


RSE TUP 





LDONE 
REPORT DATA FAILURE. 

#L2,a4STMP2 

MLDATIO, aa$TMP3 

MLDATOO, AAS TMPS 

+61 

LDONE 


#LPAT20,R2 iD 
MLDATOO,R3 ZF 


#4 RG 
(R2) +, (R3)+ 
LERR3 


; (BUT FD) 


R4,1$ 

#L2, a4STMP2 
#LDATIO, a#$TMP3 
#LDATO1 . aa#$TMPG 


LDONE 


114631 


GO INITIALIZE THE FPS AND STACK; AND 
SEE IF THE USER HAS EXPRESSED 

THE DESIRE TO C E THE SOF TWAR 
VIRTUAL CONSOLE SWITCH REGISTER (HAS 
THE USER TYPED CONTROL G? 


(ROR SBARRSASASAL AR ESERERRSARRRRRRR RRR RRR RARARR ARR RRR ARR RR RASS SD OD 


:*TEST 17 


FSRC MODE 2 WITH GR?, IMMEDIATE MODE, TEST 


:* THIS IS A TEST OF FSRC MOD 


:* USING GR7 (THE PC). 


_. 


THIS IS IMMEDIATE 


PAAR AREER EEE EERE EE ERAA REAR ER ERR EE REA eee 


6662 
6664 27 ¥ 
MOV : 
: 62 
BR 
3142 : 
000001 » F 
000000 : 0 
0 >: 
000000 : 0 
000000 Li a 0 
; HANG SO E 
: ° G?). 
E 2 
* MODE. 


SEQ 0082 
L. 


| 


CKFPAAQ FP1IF FLTG PNT PRT A 


F 
MACRO M1111 26=SEP=79 09:38 PAGE 13- 


FSRC MODE 2 WITH GR7, IMMEDIATE MODE, TEST 


016760 
3217 
3218 016762 
3219 016762 
3220 


016764 
016770 


3221 

3222 

32 

3224 016772 
3225 016774 
3226 
3227 017002 
322 

3229 017004 
3230 017006 
3231 017010 
35% 017012 
3234 017014 


3235 017020 
3236 017022 


3240 917024 
3241 017030 


Sez 017032 


017066 
55 017072 
3256 017076 
3257 017100 
eee 017102 


32 

3260 017104 
3261 017104 
3262 017112 
3263 017120 
3264 017126 
3265 017130 


3266 
3267 017132 


000004 


170011 
012700 
172410 
005004 
012737 
172427 
017004 


012700 
174010 


012700 


000433 
077105 


012737 
012737 
012737 
104063 
000466 


012705 


017256 


017216 
000000 


000003 


017276 


017276 
005204 


000003 


017276 
000004 
005204 


017002 
017266 
017276 


017006 


060004 


001236 
001240 
001242 


TST17: 
M1: 


M15: 


Me: 


MERR2: 


1$: 


MERRO- 


SCOPE 


SETD 


#MPAT10,RO 
(RO) ,ACO 


7 
13 


R4 
AMERR3 , AMERRVECT 


#0,AC0 


AMDATOO ,RO 
ACO, (RO) 


A#MDATOO ,RO 
#5204, (RO)+ 
M 


#MDATOO,RO 
#4,R1 
#5204, (RO) + 
m9 

MERR1 

R1,M8 


4M15 ,aASTMP2 


AMPAT 20 , aA STMP 3S 
AMDATOO, aA STMPS 


+63 


MDONE 
M2 ,R5 





SEQ 0083 


;LOAD BACKROUND 
PATTERN INTO ACO. 


sTEST INSTRUCTION 


NOTE THAT 
3005204=INC R4 


;SEE IF THE PC 

WAS _INCREMENTED 

BY 2 DURING THE 
INSTRUCTION. IF 

;NOT THEN A BAD 

; CONSTANT WAS GENERATED 


;GET THE DATA 


31S THE DATA CORRECT? 


;DID (BUT GRM) FAIL? 


;REPORT FAILURE 
;OF (BUT GR7) 


REPORT FAILURE 











CKF PAAQ yohy FLTG PNT PRT 
FSRC MODE 2 wITH GR, 





3270 


3276 017166 
3277 
3278 017170 


3281 204 
3282 017212 
3283 017214 
3284 


3285 017216 
3286 017222 
3287 017224 
3288 


3295 
3296 017256 
3297 017260 
3298 017262 
3299 017264 
3300 


3301 017266 

3302 017270 

3303 017272 

3304 017274 
305 


3 

3306 017276 
3307 017300 
3308 017302 
3309 017304 


3310 
3311 017306 
017306 


e223 


001242 
000003 


001240 
017002 


G 
MACRO M1111 26=SEP=79 09:38 PAGE 14 
IMMEDIATE MODE, TEST 


0012 





36 














RS ,@4$TMP4 7PC INCREMENTED 
SUB #3,RG 
ASL RS 
SUB R4,RS 


MOV R5 ,a#$TMP3 


MOV mis. ars TMP2 
1$: ERROR 
BR MOONE 





MERR1: :REPORT DATA 
MOV #15, a4$TMP2 =: FAILURE 
MOV AMDATOO, a#$TMP3 
MOV AMPAT 20. a#$STMPS 
1$: ERROR +66 
BR MDONE 
: TRAP TO HERE THROUGH 4. 
MERR3: BIT #1, (SP) iSEE IF THE 
BNE 1$° TRAP TO 4 OCCURRED 
JMP a4CPSPUR “BECAUSE OF AN 
[ODD ADDRESS 
1$ MOV (SP),a#$T™MPZ =: IF YES REPORT 
MOV #2, BASTMPS [BAD CONSTANT 
MOV WMS aa#SIMP2 = GENERATED 
CMP (SP)+, (SP) + 
2$ ERROR +65 
BR MDONE 
MPAT10 o] 
MPAT11 of 
MPAT12 =f 
MPAT13 a! 
MPAT20: 5204 
MPAT21: 204 
MPAT22: 5204 
MPAT23: 5204 
MDATOO 0 
MDATO1: 0 
MDATO2: ° 0 
MDATO3: 0 
RSE TUP :GO INITIALIZE THE FPS AND STACK; AND 
‘SEE IF THE USER HAS EXPRESSED 
‘THE DESIRE TO CHANGE THE SOF TWARE 
‘VIRTUAL CONSOLE SWITCH REGISTER (HAS 
‘THE USER TYPED CONTROL G?). 
SERRA ARARAARAARAEARAEARARAERARAERARARERARHRARRAERARRARARARARERARERERRRARKREE REE Ae 
:*TEST 20 FSRC MODE 3 TEST 


- THIS IS A TEST OF FSRC MODE 3, AUTO INCREMENT 
:* DEFERRED 


SL AAAAAAARANRHAERARHEAHARAAREARAARAKREHAEAHREAARARKRARKReRAeKRAHRRKAReenesene 









_ 


CKFPAAQ FRPIIF FLTG 4 Ra A 


720 FSRC MODE 3 1 
, 017310 000004 


32 
322 017312 

325 017312 170011 
324 

325 


017314 012700 
$58 017320 172410 


32 

328 017322 012700 
005003 

eee 017330 012737 


33 
3337 017344 012701 
thd 017350 174011 


3340 017352 020027 
3341 017356 001437 


3347 017370 020027 
3348 017374 001001 
Sten 017376 000520 


3362 017434 012703 


366 

ton 017452 000502 
ta 017454 000505 
3371 017456 012702 


001002 
3376 017476 077403 


017774 


017762 
017504 


017742 
017764 


017772 
017752 


017762 


017742 
017742 
000004 


017742 
020004 
000004 


MACRO M1117 


TST20: 


NI: 


Ne: 


NS: 


N6é: 


N7: 


N8&: 


N9: 


N10: 


N11: 
Ni2: 


N73: 


H 7 
26-SEP=79 09:38 PAGE 14-1 
SCOPE 


MOV #NPAT10,R0 
LOD (RO) ACO 


MOV  Silaetnas 
MOV MNERRO, @FERRVECT 


LDD a(RO)+,ACO 
R3 


INC R3 

MOV #NDATOO,R1 
STD ACO, (R1) 

CMP RO. ANPAT20+2 
BEQ Ni2 


CMP RO, 4NPAT 20+10 
N6 


BR NERR1 | 
CMP «RQ, ANPAT 20~10 
BNE =—N? 

BR NERR2 

CMP RO, ANPAT20 
BNE =—s_NIi 

MOV monies. R2 
MOV 4,R3 

cMP 3) +A 

BNE 

SOB RS NB 

BR NERR3 


MOV #NDATOO,R2 
MOV nice mn 


#4,R 
CMP (R2)+,(R3)* 
N11 


SOB R4 N10 
BR NERR4 


BR NERR5S 


MOV #NDATOO,R2 
MOV #NDATIO,R3 


MOV #4 RG 
ap (R2)+,(R3)* 
bri N14 


SOB R4,N15 


:SE€T FD MODE 


:LOAD ACO WITH A DEFAULT 
PATTERN 


: IF *. fry! OCCURS 
7IN THE FSRC FLOWS AN 
:ODD TRAP TO 4 COULD OCCUR 
3TEST INSTRUCTION. 


;GET THE DATA 
7WAS RO INCREMENTED 
;BY 2? 


zFSRC MODE 2? 
sFSRC MODE 4? 


zFSRC MODE 0? 


sFSRC MODE 1 


DATA CORRECT? 


SEQ 0085 


. ¢€ 
“we FPIIF FLTG PNT PRT A MACRO M1111 26=SEP=79 09:38 PAGE 142 


FSRC MODE 3 TEST SEQ 0086 

pre 017500 000545 BR NDONE 
$555 017502 000504 N14: iota NE RRO 
3381 ;1F AN ODD ADDRESS TRAP OCCURS COME HERE 
3382 :TO SEE IF THE FAILURE WAS IN THE FSRC 
MH 7FLOwS 
3385 017504 022716 017342 NERRO: CMP ANG , (SP) sFSRC MODE 6 OR 7? 
3386 017510 001412 BEQ NERR10 
3387 017512 022716 017340 CMP N3, (SP) 
3388 017516 001402 BEQ 1$ 
3389 017520 000137 040266 JMP a4CPSPUR 
3390 017524 020027 017760 1$: CMP RO, ANPAT 20-2 sFSRC MODE 5? 
3391 017530 001407 BEQ NERR11 
$308 017532 000137 040266 JMP a4CPSPUR 
3394 017536 NERR10: ;WENT TO FSRC 
3395 017536 011637 001236 MOV (SP) ,@#$STMP2 sMODE 6 OR 7. 
3396 017542 022626 CMP (SP)+,(SP)+ 
3397 017544 104067 18: ERROR +67 
$355 017546 000522 BR NDONE 
3400 017550 011637 001236 NERR11: MOV (SP) ,a@#$TMP2 sWENT TO FSRC 
3401 017554 022626 CMP (SP)+, (SP) + sMODE 5. 
3402 017556 012737 000627 001244 MOV #627 ,@ASTMPS 
3403 017564 012737 000323 001250 MOV #323, a4$TMP7 
3404 017572 012737 000325 001246 MOV #325, a#STMP6 
3405 017600 104079 1$: ERROR +70 

06 017602 BR 


34 000504 NDONE 
3407 017604 012737 000322 001246 NERR1: MOV #322 ,Q4STMP6 iFSRC MODE 2. 
3408 017612 012737 000627 001244 NERR20: MOV #627 ,@ASTMPS 


3409 017620 012737 000323 001250 MOV #323, aASTMP7 

3410 017626 012737 017336 001236 MOV #N2 ,QASTMP2 

3411 017634 104071 1$: ERROR +71 

3412 017636 000466 BR NDONE 

3413 017640 012737 000324 001246 NERR2: MOV #324 ,aA#STMPO ZFSRC MODE 4 
3414 017646 000761 BR NERR 

3415 017650 012737 000320 001246 NERR3: MOV #320, a4$TMP6 sFSRC MODE 0 
3416 017656 000755 BR NERR2O 

3417 017660 012737 000321 001246 NERR4: MOV #321 ,a#STMP6 3FSRC MODE 1 
ie 017666 1 BR NERR20 

3420 017670 010037 001240 NERRS: MOV RO, a#$STMP3 jr? NOT 

3421 017674 012737 017764 001242 _ MOV #NPAT20+2, aS TMP 7 INCREMENTED 
3422 017702 012737 017336 001236 MOV #N2 , aASTMP2 “PROPERLY. 
3423 017710 104072 1$: ERROR +72 

ee5e 017712 000440 BR NDONE 

3426 017714 : NERRO: DATA FAILURE. 
3427 017714 012737 017336 001236 MOV #N2 ,@ASTMP2 

3428 017722 012737 017742 001240 MOV #NDATOO, aw$TMP3 

3429 017730 012737 020004 001242 MOV #NDATIO,a#$TMP4 

3430 017736 104073 1$: ERROR +73 

ee 017740 000425 BR NDONE 

3433 017742 000000 NDATOO: .WwORD 0 





ry i, 


CKFPAAO FPIIF FLTG a Fl A 


FSRC MODE 3 T 


3434 017744 

3435 017746 

3436 017750 

3437 

3438 017752 
7760 


3445 017776 
3446 020000 
3447 020002 
3448 
3449 020004 
3450 020006 
3451 020010 
3452 020012 
3453 
3454 020014 
020014 


020016 
64 


3465 020020 
3466 020020 
3467 





3480 
3481 020052 
3482 020056 
3483 






052525 
052525 
020004 


000004 


170011 


072700 
172410 


012700 
005003 
012737 


172450 


012701 
174011 


052525 052525 


020500 


020466 
020210 000004 


020446 


o¢ 
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SEQ 0087 
NDATO1 Q 
NDATO2 Q 
NDATO3 0 


«WORD = 52525,52525,52525,52525 





NPAT21 070707 
NPAT22 070707 
NPATO 070707 
.WORD 1 
NPAT10: .WORD <1 
NPAT71: o] 
NPAT12 -1 
NPAT13 -1 
NDATIO: .WORD 010421 
NDAT!1 021042 
NDATI2: 031463 
NDATI3: 042104 
ND 
RSE TUP :GO INITIALIZE THE FPS AND STACK; AND 
>SEE IF THE USER HAS EXPRESSED 
=THE DESIRE TO CHANGE THE SOFTWARE 
=VIRTUAL CONSOLE SWITCH REGISTER (HAS 
:THE USER TYPED CONTROL G?). 
FFARR RARAAAARAKRARAARAARERAEREARAAERERRAEAARERARRAAHARERARHEREHHR 
;*TEST 21 FSRC MODE 5 TEST 
+ THIS IS A TEST OF FSRC MODE 5, AUTO DECREMENT 
:* DEFERRED. 
+ PARR RBBABAABRERBASRASEASASRSRSERSARESRES ESSER ERE RAR ARSE R RARER RRR RRR RRA SSE SE | 
15121: SCOPE 
Ol: 
SETD :SET FD MODE 
MOV #0PAT10,RO 
LDD (RO) ,ACO ;LOAD ACO WITH A 





;DEFAULT PATTERN. 






#OPAT21,RO 
R3 


MOERRO,@MERRVEC ; 5 A_ FAILURE 
OCCURS IN THE FSRC 



















STRAP 
a ee STEST INSTRUCTION 
R3 


#ODATOO,R1 
ACO,(R1) 










;GET THE DATA 








CKFPAAO FP11F FLTG PNT PRT A 
121 FSRC MODE 5 TEST 


%484 020060 94 020464 
oe 4 020064 001436 
4 020066 020027 020476 


90 
3491 020076 020027 020456 


34% 

8-4 020106 020027 920466 
3497 Oot e 012702 020450 
3498 116 000004 
3499 050125 022227 177777 
3500 001002 


3 
3504 020134 012702 020446 
3505 020140 012703 020466 
3506 020144 012704 000004 
3507 020150 022223 
001002 


3509 020154 077403 
Pa 020156 000502 


a2\¢ 020160 000505 


3514 020162 012702 020446 
3515 020166 012703 020510 
000004 


ey 4 020210 022716 020050 
3530 020216 022716 020046 


3532 020224 000137 040266 
3533 020230 020027 020470 


3534 34 
eee 020236 000137 040266 


35 

3537 020242 

3538 020242 011637 0012 * 
3539 020246 022626 

3540 020250 104074 


MACRO M1117 


05: 


06: 


07: 


08: 


09: 


010: 


O11: 


O12: 


013: 


014: 


K 7 
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CMP RO, #OPAT20 
BEQ 012 


CMP RO ,AOPAT 27+10 
BR GERRI 
CMP ~ sapiens 
BR OERR2 
CMP RO,AOPAT 21 
MOV eh -R2 
CMP (RO) +, #=1 

09 


SOB R3,08 
BR OERR3 


MOV #ODATOO,R2 
MOV ~*~ age 


#4 ,R 
CMP (ati 


MOV #ODATOO,R2 
MOV #ODATIO,R3 


#4 RS 
CMP a 


IF AN ODD ADDRESS TRAP OCCURS 
THERE TO SEE IF THE FAILURE WAS IN THE 


3FSRC FLOWS: 
OERRO: CMP #04 , (SP) 
EQ OERR10 
CMP #03, (SP) 
BEG 1$ 
JMP @4CPSPUR 
1$: CMP RO ,AOPAT 21+2 
BEQ OERR1 
JMP @4CPSPUR 
OERR10: 
MOV (SP) ,@A#$TMP2 
CMP (SP)+,(SP)+ 
1$: ERROR +74 


sWAS RO DECREMENTED 
:BY 2? 


zFSRC MODE 2 


sFSRC MODE 4? 


sFSRC MODE 0? 


zFSRC MODE 1? 


DATA CORRECT? 


COME 


3FSRC MODE 6 OR 7? 


ZFSRC MODE 3? 


;WENT TO FSRC 
[MODE 6 OR 7 


SEQ 0088 


=o 


3541 020252 
3542 
3543 020254 


3547 020276 
3548 020304 
3549 020306 
3550 

3551 020310 
3552 Bedale 


52 
3559 020354 
3560 020362 
3561 020364 
3562 020372 
3563 
3564 020374 
3565 020400 
3566 020406 
3567 020414 
3568 020416 
3569 
3570 020420 


3575 020444 
3576 

3577 020446 
3578 020450 


3579 020452 
3580 020454 
3581 


3591 504 
3592 020506 
3593 

94 020510 


596 14 
3597 020516 


000522 
011637 


012737 
012737 
012737 


177777 


073567 
004210 
114631 
125252 





CKFPAAO FP11F FLTG PNT PRT A 
FSRC MODE 5 TEST 


020044 
020446 
020510 


052525 


MACRO M1111 


0012%6 
001240 
001242 


052525 


OERR11: 


OPAT13: 


ODATIO: . 
ODATI1: 
ODATI2: 
ODATI3: 


L 
26-SEP-79 09:38 PAGE 14- 


BR 
MOV 


? 
5 


ODONE 
(SP) ,a#SiMP3 


;WENT TO FSRC MODE 


(SP)+,(SP)+ ‘3 


#325, - aS TMP6 
ODONE 
#322, a4STMP6 


7300 a4#$ TMP6 


zFSRC MODE2 


sFSRC MODE 4 
zFSRC MODE 0 
zFSRC MODE 1 


arg RO NOT DECREMENTED 
mg saints 5 


PROPERLY 


;DATA FAILURE 


#02, @ASTMP2 
#ODATOO, aA STMPS 
#ODATIO, BAS TMPS 
+100 


ODONE 


0 
0 
0 
0 


52525,52525,52525 
ODAT10 


125252 


SEQ 0089 





=—m- 


M 7 
CKFPAAO FP11F FLTG PNT PRT A MACRO M1111 26-SEP-79 09:38 PAGE 14-6 
T21 FSRC MODE 5 TEST 


3598 +. 
3599 020520 ODONE : 
020520 104412 ‘= INITIALIZE THE FPS AND STACK; AND 
SEE IF THE USER HAS EXPRESSED 
STHE DESIRE TO CHANGE THE SOF TWARE 
[VIRTUAL CONSOLE SWITCH REGISTER (HAS 
;THE USER TYPED CONTROL G?). 


SF ARAAAARARARARAARERERRARRERARARERRARERREREAREARRRKAREARARERERREEH 


i*TEST 22 FSRC MODE 6 TEST 

;? 

:* THIS IS A TEST OF FSRC MODE 6, INDEX MODE 
fh 


=MAsSAASRARARALASAASALALESASAALARSAASERAR AAS RR SRA SRR RRR RRA A RAS SS SS OD | 


020522 000004 78122: SCOPE 


3609 020524 Pl: 
0 020524 170011 SETD SET FD MODE 


012700 021144 MOV #PPAT10,RO 
172410 LDD (RO) ,ACO At — PATTERN 


; IN 
012737 020642 #PERRO, QFERRVECT 7 IF THE (BUT FSRC) FORQ 
AILS AN ODD ADDRESS TRAP 
012700 020713 #PDAT 10-241 ,RO ‘COULD OCCUR. 


172460 000241 Pe: 241(RO) ACO 
020550 P3=P2+2 


012701 P4: #PDATOO,R1 
al ia 3GET THE DATA 


-R 
#PDATIO,R2 
#PDATOO,R1 
+ a aaa ;CHECK THE DATA 


oiatatatataty's 
Co 


R3,P5 
020713 orien ae RO CORRECT? 


BR PERR21 
,021174 : @4PDONE 


Suse By gpa 
177777 : ai. (Rt)s :WAS IT FSRC MODE 0? 


020550 
020552 WAS IT FSRC MODE 7? 
040266 





CKFPAAQ FP11F FLTG PNT PRT A 


T22 FSRC MODE 6 TEST 


3677 021024 
3678 
3679 021026 


012737 
000443 
022700 
001004 
012737 
0004 34 
022700 
001004 
IT AE 4 


000416 
012737 
012737 


011637 
022626 
000403 


012737 


010037 
012737 
104102 
000445 


012737 
012737 
012737 
104104 
000432 


012737 


177777 
177777 


000327 
020713 
000321 
020723 
000322 
020715 
000323 
020703 
000324 
020711 


020546 


001240 
020713 


020546 
021154 
021164 


020546 
000627 
000326 
000320 


N 7 
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001246 


001246 


001246 


001246 


001246 


001246 


001244 
001250 


001236 


001242 


001236 
001240 
001242 


001246 


PERR10: 
PERR11: 


PERR12: 


PERR13: 


PERR14: 


PERR15: 


PERR16: 


PERR17: 


1$: 


PERR20: 


PERR21: 
PERR22: 


1$: 


PPAT10: 
PPAT11: 


. WORD 


#327, aASTMP6 
PERR17 

#PDATI0=241,RO0 ;WAS IT FSRC MODE 1 
PERR12 

#321, a4$1MP6 
PERR17 
#PDAT10-241+10,R0 
PERR13 

#322, a#STMPC 
PERR17 
#PDAT10=241+2,R0 
PERR14 

#323, a#STMPG 
PERR17 
#PDAT10=241-10,R0 
PERR15 

#324, a#STMP6 
PERR17 
APDAT10-241-2,R0 
PERR16 


WAS IT FSRC MODE 2 
;WAS IT FSRC MODE 3 
;WAS IT FSRC MODE 4 


WAS IT FSRC MODE 5 
PERR20 

#325 ,@ASTMP6 

#627 ,AASTMPS REPORT FSRC 

#326, 4S TMP7 ;FLOWS FAILURE. 

(SP) ,a@#STMP2 

(SP) +, (SP)+ 


+101 
PDONE 


(SP) ,-a#$STMP2 sREPORT RO AFFECTED 
(SP) +, (SP)+ 

PERR22 

#P2, aA4$STMP2 


RO, a4$STMP3 
#PDATI0N-241, a4STMPS 
+102 


PDONE 


DATA FAILURE. 
#P2 ,@ASTMP2 
#PDAT10, @A#$TMP3 
TOO, a $TMP4 


:FSRC FAILURE TO 
#P2, aASTMP2 ‘MODE 0 

#627, aASTMPS 

#326, a4STMP7 

#320, a4STMP6 

+103 

PDONE 


-1 
-1 





8B 8 
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T22 FSRC MODE 6 TEST SEQ 0092 
3706 021150 177777 PPAT12: -1 
add 021152 177777 PPAT13: -1 
3709 021154 10421 PDATIO: .WORD 010421 
3710 021156 031463 PDATI1: 031463 
3711 021160 052525 PDATI2: 052525 
sig 021162 073567 PDATI3: 073567 
3714 021164 000000 PDATOO: .WwORD 0 
3715 021166 000000 PDATO1: 0 
3716 021170 000000 PDATO2: 0 
16 021172 000000 PDATO3: 0 
3719 021174 PDONE : 
021174 104412 RSE TUP 3;GO INITIALIZE THE FPS AND STACK; AND 
;SEE IF THE USER HAS EXPRESSED 
; THE DESIRE TO CHANGE THE SOF TWARE 
* VIRTUAL CONSOLE SWITCH 3 eae (HAS 
372 ; THE USER TYPED CONTROL G?) 
3727 
3728 RRR EERE ERA ERR REE REE EREEERE EERE EEE 
:#TEST 23 FSRC MODE 7 TEST 
= THIS IS A TEST OF FSRC MODE 7, INDEX 
;* DEFERRED MODE. 
,  eeneennenedacnsnenceonennnenaceeretenesqqnenetesseeeeneeeesese 
37 021176 000004 TST23: SCOPE 
3730 021200 Q1: 
ie 021200 170011 SETD 
3733 021202 012700 021634 MOV —s- #QPAT10, RO 
3734 021206 172410 LDD (RO) ,ACO Be A yt 
3735 ATTERN INTO ACO 
3736 021210 012737 021342 000004 MOV #OERRO.aMERRVECT” 2 if hy (BUT FSRC) 
3737 sFORK FAILS AN 
3738 ODD ADR TRAP COULD 
3739 SOCCUR 
toch 021216 012700 021403 MOV MQPAT20-241,R0 
3742 021222 172470 000241 Q2: LDD @241(RO) ,ACO 
sez 021224 Q3=02+2 
3745 021226 012701 021654 Q4: MOV #QDATOO,R1 
3009 021232 174011 STD ACO, (R1) ;GET THE DATA 
3748 021234 012703 000004 MOV #4 ,R3 
3749 021240 012704 021654 MOV #QDATOO,R4S 
3750 021244 012705 021664 MOV #QDATIO,R5S 
3751 021250 022425 Qs: CMP (R4)+,(R5)+ ;CHECK THE DATA 
3752 021252 001007 BNE Q6 
$5e7 021254 077303 $0B R3,05 
3755 021256 022700 021403 CMP MQPAT20-241,RO ;CHECK RO. 
3756 021262 001401 BEQ 1$ 





CKFPAAO FP11F FLTG PNT PRT A 
123 FSRC MODE 7 TEST 


3757 021264 000514 
te 021266 000137 021674 


3 
3760 021272 012701 021654 
000004 
21502 022721 177777 
002 


3766 

3767 021314 012701 021644 

3768 021320 012702 021654 
000004 


ere 021340 000504 
3776 


3777 
3778 021342 021627 020550 
$a 021346 000137 040266 


3781 021352 022700 021403 
3782 021356 001004 
3783 021360 012737 000321 
3784 021366 000434 
3785 021370 022700 021413 
1374 001004 
3787 021376 012737 000322 
021404 000425 
3789 021406 022700 021405 
3790 021412 001004 
3791 021414 012737 000323 
3792 021422 000416 
3793 021424 022700 021373 
21430 001004 


021 1 
3795 021432 012737 000324 
sone 021440 000407 


3798 021442 022700 021401 
3799 021446 001401 

tony 021450 000416 

3802 021452 012737 000325 
3803 


3804 021460 012737 000627 


506 011637 001236 
512 022626 
514 000403 


.. & 
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MACRO M1111 
BR QERR21 
1$: JMP @4QD0NE 
Q6: MOV #QDATOO,R1 
MOV #4 ,R3 
Q7: CMP #~1,(R1)+ ;WAS IT FSRC MODE 0? 
BNE 08 
SOB R3,07 
BR QERR2 
Q8: MOV #QPAT20,R1 
MOV #QDATOO ,R2 
MOV #4 ,R3 
Q9: CMP (R1)+,(R2)+ sWAS IT FSRC 6 
BEQ Q10 OR DATA FAILURE 
BR QERR1 
Q10: SOB R3,Q9 
QERR3 
; TRAP TO HERE ON AN ODD ADR FAILURE 
QERRO: CMP (SP) ,AP3 
JMP @4CPSPUR 
QERR11: CMP MQPAT20=241,RO ;WAS IT FSRC 
BNE QERR12 sMODE 1? 
001246 MOV #321, @#S TMP 
BR QERR17 
QERR12: CMP #QPAT20-241+10,R0 WAS IT FSRC 
BNE QERR13 ;MODE 2? 
001246 MOV #322 ,Q4STMP 
BR QERR17 
QERR13: CMP ir WAS IT FSRC 
BNE QERR14 sMODE 3? 
001246 MOV #323, a4S TMP 
BR QERRi7 
QERR14: CMP #QPAT20-241-10,R0 :WAS IT FSRC 
BNE QERR15 sMODE 4 
001246 MOV oaeee _— 6 
BR 
QERR15: CMP #QPAT20-241-2,R0 WAS JT FSRC 
BEQ QERR16 ;MODE 5 
BR QERR20 
001246 QERR16: MOV #325 ,@A#STMP6 
001244 QERR17: MOV #627 ,@ASTMPS REPORT FSRC FAILURE 


001250 MOV #327. aASTMP7 
MOV (SP); a#$TMP2 
CMP (SP)+, (SP)+ 
1$: ERROR +105 
BR QDONE 
QERR20: MOV (SP) ,aaSTMP2 
CMP (SP)+. (SP) + 
BR QERR22 


REPORT RO AFFECTED. 


SEQ 0093 


“on 


 aaead FP11F FLTG PNT PRT A 
123 FSRC MODE 7 TEST 


3814 021516 
3815 021524 
3816 021524 
3817 021530 
3818 021536 
3819 021540 
3820 

3821 021542 


Oo oO 
ror 
> ay 
wi“ 
wv 
NO 


021566 
3827 021574 
3828 021602 


3845 021650 
3846 021652 
3847 


3848 021654 
en 021656 


3850 021660 

3851 021662 

3852 

38 1666 

3855 021670 

3856 021672 

3857 

3858 021674 
021674 


012737 


012737 
000403 
012737 
012737 


052525 
000000 
000000 
000000 
000000 


073567 


104412 


021222 


001240 
021403 


021222 


ae ieee 
02106 
are? 


MACRO M1111 


001236 


001242 


001246 
001246 
001244 


001250 
001236 


001242 


QERR21: 
QERR22: 


1$: 


QPAT10: . 
QPAT11: 
QPATI2: 
QPAT13: 


QPAT20: . 
QPAT21: 
QPAT22: 
QPAT23: 


QDATOO: 
QDATO1: 
QDATO2: 
QDATO3: 


QDATIO: . 
QDATI1: 
QDATI2: . 
QDATI3: . 


QDONE 


MOV 


. WORD 


D 8 
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#Q2,a4STMP2 


RO, a#STMP3 

#QPAT 20-241 , @#STMPS 
+106 

QDONE 

#320, a4STMP6 
QERRS 
#326, 04S TMP6 
#627 ,@ASTMPS 
#327 ,@ASTMP7 
#02 ,@AETMP2 


+107 
QDONE 


;WENT TO FSRC 
sMODE 0 
sWENT TO FSRC 
sMODE 6 


;DATA FAILURE 
#Q2,a4STMP2 
#QDATIO, aA#$STMP3 
1 ama taat ities 
+ 


010421 


3GO INITIALIZE THE FPS AND STACK; AND 
[SEE IF THE USER HAS EXPRESSED 

THE DESIRE TO CHANGE THE SOFTWARE 
:VIRTUAL CONSOLE SWITCH REGISTER (HAS 
THE USER TYPED CONTROL G?). 


'WERARRASAASLALAASASLALSSASESARSERERERARASE RRR RRR RRA RRR RRR SSAA R ERS SS I 


:*TEST 24 


:* THIS IS A TEST OF THE (BUT EZBT Y8) FORK, THE 
>* (BUT ENBT) FORK AND (BUT FIUV) FORK IN THE 
:* LOAD INSTRUCTION FLOWS. 


(BUT EZBT Y8), (BUT ENBT) AND (BUT FIUV) TEST 


-—o- 


021676 
3877 021700 


021714 
1 021720 
3883 021722 
3884 021 


3897 
3898 022016 
3899 


3900 622024 
3901 022030 


3903 022032 
904 


3908 022044 


022052 
022056 
3 022060 


4 022066 
022074 


3916 
3917 022102 
918 
3919 022106 


077103 
012737 


012737 
012737 


012737 


012704 
170205 


012737 
012700 
172410 


eat FPIIF FLTG PNT PRT A 
124 (BUT E7BT Y8), (BUT 


022776 
022726 


000004 
177777 
000033 
000023 
022456 
000200 
022726 
023000 
000001 
000254 


022736 


001252 
022010 


000204 


022502 


000200 


022726 
023002 
000003 
000054 


022746 


ENBT) 


MACRO M1111 


02000 
023002 
000244 


023004 
023006 
023010 


001236 


023004 
023006 
023010 


E 8 
26-SEP=79 09°38 PAGE 14-11 
AND (BUT FIUV) TEST 


3 EACH OF THE oe 


U1: 


U2: 


U3: 


IS 
Wl 
CH 
THROUGH WITH THE FORKS PROPERLY. 


+NUM 
-NUM 





a 


SEQ 0095 


-0 
LOADED TWICE, ONCE WITH AC>O THEN 


TH AC=0. 


AFTER EACH LOAD THE FPS IS 


eCK TO INSURE THAT CONTROL WAS PASSED 





@AUF LAG 
rane 


#4,R 
#-1,(RO)+ 
R1,U0 

#033, 04UTMP1 
#023, a4U1MP 


2 
MUERRO , a@A4FPVECT 


#200,R0 
RO 


#254. @AUROMS 
#UPAT10,RO 
(RO) ACO 

RO, a#$TMP10 
#U2, aASTMP2 


#204 ,R4 
R5 
R4,R5 
U3 
@AUERR 1 
#200,R0 
RO 
#UPATOO,RO 
0 

#054, @#UROM3 


#UPAT20,RO 
(RO) ,ACO 


SET UP AC&O DATA, 


7 IN CASE (BUT FIUV FAILS) 
;SET UP THE LOOP ON ERROR ADDRESS. 


;LOAD ACO 


;LOAD 0 INTO ACO 


SEE IF FPS IS CORRECT 


;SET UP THE LOOP ON ERROR ADDRESS. 


;LOAD ACO 


OSITIVE NUMBER 









3920 022110 
$921 022114 
3922 022122 
392% 022126 


CKFPAAO FPIIF FLTG PNT PRT A 
124 (BUT EZBT Y8),(BUT ENBT) AND (BuT FIUV) TEST 


010037 
012737 
012704 
170205 


001252 
022106 001236 
000200 


F 
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RO, a#$TMP10 
MUS , @ASTMP2 








ZFPS CORRECT? 


“on 


CKFPAAQ FPI1F FLTG PNT PRT A 


124 (BUT EZBT Y8),(BUT ENBT) AND (BuT FIUV) TEST SEQ 0097 
3925 
3926 022130 020405 CMP R4 RS 
3927 022132 001402 BEQ uS 
3928 022134 000137 022566 JMP QAUERRZ 
3929 022140 US: 
022140 104413 LPERR :SET UP THE LOOP ON ERROR ADDRESS. 
3930 022142 012700 000200 y #200,RO 
3931 022146 170100 LDFPS RO 
3932 022150 012700 022726 MOV #UPATOO,RO ZLOAD ACO 
3933 022154 172410 LDD (RO) ,ACO 
3934 022156 013737 023002 023004 MOV TMP2 , AUROM1 
3935 022164 012737 000403 023006 MOV #403, @#UROM2 
39% 022172 012737 000056 023010 MOV #056. aFUROM3 
3937 022200 012700 022756 MOV #UPAT30,RO :LOAD A NEGATIUF 
3938 ;NUMBER INTO ALO 
3939 022204 172410 U6: LDD (RO) ,ACO 
3940 022206 010037 001252 MOV RO, a#$TMP10 
3941 022212 012737 022204 001236 MOV AAS TMP? 
3942 022220 012704 000210 MOV #210,R4 :FPS CORRECT 
3943 022224 170205 STFPS 
3944 022226 020405 CMP R4,RS 
3945 022230 001402 BEQ 
3946 022232 137 022566 JMP @AUERR2 
3947 022236 U?: 
022236 104413 LPERR :SET UP THE LOOP ON ERROR ADDRESS. 
3948 022240 012700 000200 V #200,RO 
3949 022244 170100 _ LDFPS 
3950 022246 012700 022726 MOV #UPATOO,RO :LOAD ACO 
3951 022252 172410 LDD (RO) ,ACO 
3952 022254 013737 023000 023004 MOV @FUTMP1 , AAUROM1 
3953 022262 012737 000401 023006 MOV #401, @#UROM2 
3954 022270 012737 000256 023010 MOV #256. @#UROM3 
3955 022276 012700 022766 MOV #UPAT4O,RO :LOAD -0 INTO ACO 
956 022302 172410 U10: LDD (RO) ACO 
3957 022304 240 U11: NOP : TRAP FROM HERE IF 
3958 022306 010037 001252 MOV RO, a#$TMP10 
3959 022312 012737 022302 001236 MOV #U10,a4$TMP2 =; (BUT FIUV) FAULS! 
3960 022320 012704 000214 MOV #214,R4 SEE IF FPS IS CORRECT. 
3961 022324 170205 STFPS RS 
3962 022326 020405 CMP R4_RS 
3963 022330 001402 BEQ u12 
3964 022332 000137 022502 JMP QAUERR1 
3965 022336 005737 022776 Ule: TS) @AUFLAG ;SEE IF ALL THE PATTERNS 
3966 022342 001021 BNE U14 sHAVE BEEN TEST WITH 
3967 ;BOTH AC NOT EQUAL TO O AND AC=0 
3968 022344 012700 022726 MOV #UPATOO,RO SIF NOT GO BACK AND 
3969 022350 012701 000004 MOV #4,R1 :CHECK THEM WITH AC=0 
3970 022354 005020 u13: CLR (RO) + 
3971 022356 077102 SOB R1,U13 
3972 022 012737 177777 022776 MOV #1 QAUF LAG 
3973 022 012737 000233 023000 MOV #233, Q#UTMP | 
3974 022374 012737 000223 023002 MOV #223. aAUTMP2 
3975 022402 137 021764 JMP afui 
3976 022406 ul4: 
022406 104413 PERR :SET UP THE LOOP ON ERROR ADDRESS. 
3977 sNOW SEE. IF A TRAP CAN GE FORCED BY SETTING FIUV AND LOADING -0 
3978 022410 012737 022652 000244 MOV MUERR3, aAF PVE CT 
—_—_—_—_—_—_—_—_—_—_—_—_—_—_—_—_—_—_—_—_—_—_—_—_—X\\—\——————_-S_— 


MACRO M1117 


G 
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~~ 


H 8 
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; 


=, 


124 (BUT EZBT Y8), (BUT ENBT) AND (8uUT Fluv) TEST SEQ 0098 
3979 022416 012700 004200 MOV #4200,R0 sSET FD AND FIUV 
3980 022422 170100 LDFPS oR 
3981 022424 012700 022726 MOV #UPATOO, RO :SET UP ACO 
3982 022430 172410 LDD (RO) ,ACO 
3983 022432 012700 022766 MOV #UPAT4O,RO :LOAD <0 
39B4 022436 172% u15: LDD (RO) ,ACO ‘SHOULD TRAP TO 264 
3985 022440 17 Uu16: CFCC 
3986 022442 000240 NOP 
3987 0224664 012737 022636 001236 MOV #U15,a#$™MP2 — : REPORT ERROR. 
3988 ;DIDN'T TRAP 
3989 022452 104127 1$: ERROR +127 ; (BUT FIUV) FAILED. 
3990 022654 000556 BR UDONE 
3992 :TRAPPED TO 2464. DID (BUT FIUV) FAIL? 

3993 022456 021627 022304 UERRO: CMP (SP) ,#uU11 
3994 022462 001402 BEQ 1$ 

3995 022464 000137 040234 JMP af PSPUR 
3996 022470 011637 001236 1$: MOV (SP) ,a#$TMP2 
3997 022474 022626 CMP (SP) +, (SP)+ 
3998 022476 104126 2s: ERROR +126 

3999 022500 000544 BR UDONE 

rr ait) 7; COME HERE TO ANALYZE FPS ERRORS 
4003 022502 032705 000004 UERR1: BIT #4 R5 

4004 022506 001432 BEQ UERR20 

4005 022510 012737 000643 001244 UERR10: MOV #443, aASTMPS 
4006 022516 013703 0230°9 MOV @FUROMS , R3 
4007 €22522 010337 001250 MOV R3, aASTMP7 
4008 022526 032703 000200 BIT #200,R3 
4009 022532 001403 BEQ 1 

4010 022534 042703 000200 BIC #200,R3 

4011 022540 000402 BR 

4012 022542 052703 000200 1$: BIS #200,R3 
4013 022546 010337 001246 23: MOV R3, aS IMP 
4014 022552 010537 001240 UERR11: MOV R5. aASTMP3 
4015 022556 010437 001242 MOV R4. aASTMPS 
4016 022562 104124 1$: ERROR +124 

4017 022564 000512 BR UDONE 

4018 022566 032705 000004 UERR2: BIT #4 R5 

4019 022572 001746 BEQ UERR10 

4020 022574 013737 023004 001244 UERR20: MOV @FUROM1 , a&STMPS 
4021 022602 013703 023006 MOV @AUROM2 .R3 
4022 010337 001250 MOV R3,a4$ IMP? 
4023 022612 032703 000400 BIT #400,R3 

4024 16 001403 BEQ 

4025 0 042703 000400 BIC #400,R3 
4026 022624 000402 BR 

4027 022626 052703 000400 1$: BIS #400,R3 

4028 022632 010337 001246 2$: MOV R3, aS ITMP6 
4029 022636 010537 001240 UERR21: MOV RS. avSTMPS 
4030 022642 010437 001242 MOV RL. aASTMPS 
4031 022646 104125 1$: ERROR +125 

4052 022650 000460 BR UDONE 

4034 ; INTERRUPT HERE WHEN FIUV SET AND ATTEMPTED TO LOAD-0 
4035 022652 021627 022640 QERR3: CMP (SP) ,#U16 


CKFPAAQ FPIIF FLTG PNT PRT A 


124 
4036 


4091 


022656 


022744 


8 
022746 


022774 
022776 
0 


023012 
023014 


040234 


00001 


4 


0224 36 
000012 


1 
00124 


0 


I 8 
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(BUT EZBT ¥8), (BUT ENBT) AND (BUT FU) TEST 


BEQ 1$ 
JMP a4F PSPUR 
1$ CMP (SP)+,(SP)+ 
CLR RO 
sTst RO GET FEC. 
CMP #14,R0 S CORRECT 
BNE —— 
U 
UERR4: MOV #U15,a4$TMP2 


UPAT20: .WORD ee! :POS NUM 


UPAT30: 114631 NEG NUM 


00000 NEG ZERO 


oo 

3 

—> 
ovD0oC000 COO 


WERE REAEARE ERASER ARSE RE RR RRR RRR RR RRR RRR RR RRR RRR RRR RRR SRR RRA RARER | 


SRTEST 25 ADDF ,ADDD, SUBF AND SUBD WITH FSR(=AC=0 TEST 


-* 
i* THIS IS A TEST OF ADD AND SUB WITH FSRC=AC=0 


* 
° 


FS AAAAAAAAAAARAARAAAAHARTAAAEAARERAAARAARERHANHHHHKARKEHHKAAAeeHeNeS 
rales: SCOPE 
wl: 


ao 


J 
CKFPAAQ FP1IF FLTG PNT PRT A MACRO M1111 26=SEP=79 09:38 PAGE 15-8 


125 ADDF ,ADDD, SUBF AND SUBD WITH FSRC=AC=0 TEST SEQ 0100 
023014 104413 LPERR ;SET UP THE LOOP ON ERROR ADDRESS. 
4092 023016 012700 000200 MOV #200,R0 
4093 023022 170100 LDFPS RO :SET DOUBLE MODE 
023024 012700 023546 MOV #WPATOO,RO SLOAD ACO=: 
023030 172410 LDD (RO) ,ACO 
409% 023032 012737 023044 0012%6 MOV #2, aS TMP2 
4097 02 012700 023546 MOV #WPATOO,RO 
4098 02 172010 W2: ADDD (RO) ,ACO : TEST INSTRUCTION. 
4099 023046 170205 STFPS RS [GET FPS 
4100 023050 170011 SETD *SET DOUBLE MODE 
4101 023052 012700 023546 MOV #WPATOO,RO 
4102 023056 174010 STD ACO, (RO) :GET THE RESULT 
4103 023060 012701 023546 MOV #PATOO,R1 
4104 023064 012702 000004 MOV #4 ,R2 
4105 023070 022021 w3: CMP (RO) +, (R1)+4 :1S RESULT CORRECT 
4106 023072 001405 BEOQ W6 ve 
4108 023074 006737 023514 JSR PC, a#wWSE TUP 
4109 0233 106133 1$: ERROR +133 
4110 023102 000137 023566 JMP arwD 
4111 023106 077210 We: SOB R2,W3 
4112 023110 022705 000204 CMP #204 ,R5 :1S FPS CORRECT 
4113 023114 001410 BEQ w5 am 
4115 023116 012737 000204 001242 MOV #204, a4STMP4 
4116 023124 010537 001240 MOV RS, aASIMP3 
4117 023130 104137 1$: ERROR +137 
4118 023132 000137 023566 JMP @AWDONE 
4119 023136 w5: 
623136 104413 LPERR :SET UP THE LOOP ON ERROR ADDRESS. 
4120 023140 012700 000200 MOV #200,R0 
4121 023144 170100 LDFPS RO :SET DOUBLE MODE 
4122 023146 012700 023546 MOV #WPATOO,RO SLOAD ACO=0 
4123 023152 172410 ‘ LDD (RO) ACO 
4124 023154 012737 023172 001236 MOV Hw6, AAS TMP2 
4125 023162 005000 CLR RO 
4126 023164 170100 LDFPS RO :GO TO FLOATING MODE 
4127 023166 012700 023546 MOV #WPATOO,RO 
4128 023172 172010 wW6: ADDF (RO) ,ACO : TEST INSTRUCTION 
4129 023174 170205 STFPS RS “GET FPS 
4130 023176 170011 SETD ‘RESET TO DOUBLE MODE 
4131 023200 012700 023546 MOV #WPATOO,RO 
4132 023204 174010 STD ACO, (RO) :GET THE RESULT 
4133 023206 012701 023546 MOV #WPATOO,R1 
4134 023212 012702 000004 MOV #4 ,R2 
4135 023216 022027 W?: CMP (RO)+,(R1)+ :WAS THE RESULT - 
4136 023220 001402 BEQ w10 ‘NO. REPORT FAILURE. 
4137 023222 1$ ERROR +134 
4138 023224 000560 BR WDONE 
4139 023226 077205 w10: SOB R2,W7 
4140 023230 022705 000004 CMP #4-R5 :WAS FPS CORRECT 
4141 023234 001407 BEQ wii 
4142 : INCORRECT FPS. 
4143 023236 012737 000004 001242 MOV #4, aASTMPS 
4144 023244 010537 001240 MOV R5. aASTMP3 
4145 023250 104140 1$: ERROR +140 


4146 023252 000545 BR WDONE ’ 


“ma 


k 8 
— FP1IF FLTG PNT PRT A MACRO M1111 26-SEP=79 09:38 PAGE 15-4 


ADDF ,ADDD,SUBF AND SUBD WITH FSRC=AC=0 TEST SEQ 0101 
4147 023254 Wit: 
023254 104413 LPERR :SET UP THE LOOP ON ERROR ADDRESS. 
4148 023256 012700 000200 MOV #200.R0 
023262 170100 LDFPS RO :SET DOUBLE MODE 
023264 012700 023546 MOV #WPATOO,RO [LOAD ACO=0 
4151 023270 172410 LDD (RO) ,ACO 
4152 023272 012737 023304 001236 MOV #2. aASTMP2 
4153 023300 012700 023546 MOV #WPATOO,RO 
4154 023304 173010 wi2: SUBD (RO), ACO sTEST INSTRUCTION 
4155 023306 170205 STFPS R5 sGET FPS 
4156 023310 170011 SETD :SET DOUBLE MODE 
4157 023312 012700 023546 MOV #WPATOO,RO 
4158 023316 174010 STD ACO, (RO) ;GET THE RESULT 
4159 023320 012701 023546 MOV #WPATOO,R1 
4160 023324 012702 000004 MOV #4 ,R2 
4161 023330 022021 w13: CMP (RO) +, (R1)+ z1S RESULT CORRECT? 
4162 023332 001404 BEQ W14 wi 
4164 023334 0047357 023514 JSR PC, @4WSE TUP 
4165 023340 104135 1$: ERROR +1735 
4166 023342 000511 BR WDONE 
4167 023344 077207 wi4: SOB R2,W13 
4168 023346 022705 000204 CMP #204 ,R5 zI1S FPS CORRECT? 
4169 023352 001407 BEQ wi5 ne 
4171 023354 012737 000204 001242 MOV #204, a#STMPS 
4172 023362 010537 001240 MOV RS, aS TMP3 
4173 023366 104141 183 ERROR +141 
4174 023370 000476 BR WDONE 
4175 023372 w15: 
023372 104413 LPERR SET UP THE LOOP ON ERROR ADDRESS. 
4176 023374 012700 000200 MOV #200,RO 
4177 023400 170100 LDFPS RO ;SET DOUBLE MODE 
4178 023402 012700 023546 MOV #WPATOO,RO “LOAD ACO=0 
4179 023406 172410 LDD (RO) ,ACO 
4180 023410 012737 023426 001236 MOV #16. a4$TMP2 
4181 023416 005000 CLR RO 
4182 023420 170100 LDFPS RO sENTER FLOATING MODE. 
4183 023422 012700 023546 MOV #WPATOO,RO 
4184 023426 173010 w16: SUBF (RO) ,ACO : TEST INSTRUCTION. 
4185 023430 170205 STFPS R5 ZGET FPS 
4186 023432 170011 SETD sRESET TO DOUBLE MODE 
4187 023434 012700 023546 MOV #WPATOO,RO ‘GET THE RESULT. 
4188 023440 174010 STD ACO, (RO) 
4189 023442 012701 023546 MOV #WPATOO,R1 
4190 023446 012702 000004 MOV #4 R2 
4191 023452 022021 wi7: CMP (RO)+,(R1)+ 1S RESULT CORRECT? 
4192 023454 001404 BEQ w20 ae 
4194 023456 004737 023514 JSR PC, a#wSE TUP 
4195 023462 104136 1$: ERROR +136 
4196 023464 000440 BR WDONE 
4197 023466 077207 w20: SOB R2,W17 
4198 023470 022705 000004 CMP GS :I1S FPS CORRECT? 
4199 023474 001434 BEQ DONE i 
4201 023476 012737 000004 001242 MOV #4, DASTMPS 


— 


ore FPI1F FLTG PNT PRT A 


ADDF ,ADDD , SUBF 


4202 023504 010537 
4203 023510 104142 
este 023512 0004625 


4208 023514 012737 
4209 


osig 023554 000000 
4218 tides 000000 


023570 000004 


001240 


023546 


023546 


000200 


024332 
024320 


023626 
024342 


024322 
024332 
000004 


L 
MACRO M1111 sd 09:38 PAGE 15-5 
AND SUBD WITH FSRC=AC=0 TEST 


001236 


1$: 


WDATO2: 
WDATO3: 


WDONE : 


MOV 
ERROR 
BR 


R5, a4$TMP3 
+142 
WDONE 


FOR ERROR CALL 


RSE TUP 


#WPATOO aS TMP3 


——_— —- —— 


SEO 0102 


;GO INITIALIZE THE FPS AND STACK; AND 
;SEE IF THE USER HAS EXPRESSED 

; THE DESIRE TO CHANGE THE SOF TWARE 
:VIRTUAL CONSOLE SWITCH a (HAS 
; THE USER TYPED CONTROL G?) 


SAAR AAAEE ERR RREAERAEKRAEERRAERRARRAERERRAERAREAERAEAARRER REE 


TSTEST 26 


ADDD AND SUB WITH FSRC=0 

** 

:* THIS IS A TEST OF ADD AND SUB WITH FSRC=0. 
** 


—MmADAALAAASARSAASAALS ASSESS SRSES SER SS SSR RRR RRR RAS RRA SAR SR SERRA RS AS SSE 


18126: 
x1 


Ke: 


x3: 


K4: 


SCOPE 


#200,R0 
RO 
cw grote Fog 


#XPAT10,RO 
(RO) ACO 
R5 


#XDATOO,RO 
ACO, (ROS 
#XPATOO,R1 
#4.R 

(RO)*, (R1)+ 


XERR! 
R2,X3 


SET UP THE LOOP ON ERROR ADDRESS. 


SET DOUBLE MODE 
SET ACO TO POSITIVE 
NUMBER #0 


:FSRC=0 
ZTEST INSTRUCTION 


GET RESULT. 


31S RESULT CORRECT? 


CKFPAAO FP11F FLTG PNT PRT A 
126 ADDD AND SUB WITH FSRC=0 


4252 023662 
4253 023666 


4254 023670 
4255 023672 
4256 023676 


4305 024112 


000200 
024270 


000200 


024352 
024320 


023732 
024342 


024322 
024352 
000004 


000200 


024332 
024320 


024034 
024342 


024322 
024332 
000004 


000200 
024352 


MACRO M1111 


m 8 
26-SEP-79 09:38 PAGE 15-6 


#200,R4 
RG RS 


x 
@AXERR2 


—— 
#XPAT20,RO 
@AXT 


x6, 
#XPAT10,RO 
(RO) ,AC 

R5 
#XDATOO,RO 
ACO, (RO) 
#XPAT20,R1 
#4 ,R2 
(RO) +, (R1)+ 
x10 

XERR1 
R2,X7 
#210,R4 
R4,R5 


#XPAT10,RO 
(RO) ,AC 
R5 


#XDATOO,RO 
ACO, (RO) 
#XPATO0,R1 


#4 ,R 
(RO)+, (R1)+ 
X14 


R 
#XPAT20,RO 


31S FPS CORRECT? 


SET UP THE LOOP ON ERROR ADDRESS. 


SET DOUBLE MODE 
SET ACO TO 
NEGATIVE NUMBER 


sFSRC=0 
TEST INSTRUCTION 


7GET RESULT 


71S RESULT CORRECT? 


21S FPS CORRECT? 


SET UP THE LOOP ON ERROR ADDRESS. 


SET DOUBLE MODE 
SET ACO TO NON-ZERO 
:POSITIVE NUMBER 


3s FSRC=0 
Z TEST INSTRUCTION 


GET RESULT 
71S RESULT CORRECT? 


31S FPS CORRECT? 


SET UP THE LOOP ON ERROR ADDRESS. 


SET DOUBLE MODE 
SET ACO=A NEGATIVE 


SEQ 0103 





Nae FPI1F FLTG PNT PRT A 
126 ADDD AND SUB WITH FSRC=0 


4306 024116 


4322 024176 
4323 024200 
4324 024202 
4325 024204 
4326 
4327 
4328 
4329 024206 


4339 024266 
4340 
4341 
4342 
4343 024270 


4357 024330 
4358 

4359 024332 
4360 024334 
4361 024336 
4362 024340 


024320 


024136 
024342 


024322 


024352 
00C604 


000210 


024342 
024320 
024322 


024320 
001240 
001242 


001240 
001242 


MACRO M1111 


001236 


001246 


x16: 


Ki7: 


x20: 


M21: 
;REPORT 
XERR1: 


;REPORT 
XERR2: 


XDATO3: 


XPATOO: . 


XPATO1: 
XPATO2: 
XPATO3: 


N 8 
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MOV RO, a#X TMP 

LDD (RO) ,ACO 

MOV #16, aASTMP2 

MOV #XPAT10,RO 
(RO) .ACO 


MOV #XDATOO,RO 
STD ACO, (RO) 
MOV #XPAT20,R1 


#4 ,R2 
CMP (RO)+,(R1)+ 
x20 


CMP R4,R 
BEQ X21 
BR XERR4 
BR XDONE 
DATA ERRORS 


MOV #XPAT10, a4$TMP3 
MOV QAXTMP , AAS TMPS 

MOV #XDATOO, AAS TMPS 
ERROR +143 


BR XDONE 

MOV #XPAT10,@4$TMP3 
MOV @4XTMP , aASTMPS 

MOV AXDATOO , @A#STMPS 
MOV @AXTMP , AAS TMPE 


ERROR +144 
BR XDONE 
FPS ERRORS 


MOV RS, a4$TMP3 
MOV R4 ,@ASTMPS 
+145 


XDONE 
MOV RS ,a#$TMP3 
V R4,a4$TMP4 
ERROR +146 
XDONE 


; NUMBER 


sFSRC=0 
s TEST INSTRUCTION. 


GET RESULT 
31S RESULT CORRECT? 


:1S FPS CORRECT? 


SEQ 0104 


68 9 
_— FPIIF ass PNT PRT A MACRO M1111 26-SEP-79 09:38 PAGE 15-8 
126 ADDD AND 


SUB WITH FSRC=0 SEQ 0105 
3 
4364 024342 000000 KPAT10: .WORD 0 
4365 024344 000000 MAPT11: 0 
024 000000 KPAT12: 0 
4367 024350 000000 KPAT13: 0 
4368 024352 104210 XPAT20: .WORD 104210 
4369 024354 114631 XPAT21: 114631 
4370 024356 125252 XPAT22: 125252 
rh 2A | 024360 135673 XPAT¢3: 135673 
4373 024362 XDONE : 
024362 104412 RSE TUP :GO INITIALIZE THE FPS AND STACK; AND 
7SEE IF THE USER HAS EXPRESSED 
THE DESIRE TO CHANGE THE SOF TWARE 
VIRTUAL CONSOLE SWITCH lame (HAS 
«37% ; THE USER TYPED CONTROL G?) 
4382 'WEARARAASRASARAARRAAASASAAARRRALERSARARE RRR RRR RRA RR RRR RRR RASA SR ASE SS 
:*TEST 27 SUBD WITH AC=0 TEST 
:* THIS IS A TEST OF SUBD WITH AC=0. BOTH POSITIVE 
* AND NEGATIVE FSRC°S ARE TRIED. 
FF RAAAARAAAAARAAARRARAARRAAEREARAAARERERARARARARERERAAAAAARARAEAHREREH 
024364 000004 TST27: SCOPE 
4383 02436€ 005037 024716 CLR a4 YFLAG ¢ 
4384 02437:' 012737 024736 024720 MOV #YPATOO,@M#YTMP1 ;P 
4385 02440/) 012737 024746 024722 MOV MYPAT10,@4YIMP2 ;N 
4386 024405 012737 000210 024724 MOV #210, a4YTMP3 
4387 024414 v1: 
4414 104413 LPERR SET UP THE LOOP ON ERROR ADDRESS. 
4388 024416 012700 000200 MOV #200,R0 ’ 
4389 024422 170100 LDFPS RO SET DOUBLE MODE 
4390 024424 012700 024756 MOV #YPAT20,RO SET ACO=0 
4391 024430 172410 LDD (RO) ,ACO 
4392 024432 013700 024720 MOV avYTMP1 RO 
4393 024436 173010 Ye: SUBD (RO) ACO TEST INSTRUCTION 
4394 024440 170205 STFPS RS 
4395 024442 17001 SETD 
4396 024444 012700 024726 MOV #YDATOO,RO GET RESULT 
4397 024450 174010 STD ACO, (RO) 
4398 024452 012702 000004 MOV #4,R2 
56 013701 024722 MOV avYTMP2,R1 CHECK RESULT. 
4400 024462 022021 Y3: CMP (RO)+,(R1)+ 
4401 024464 001026 BNE Y6 
4402 024466 077203 SOB R2,Y3 
4403 024470 023705 024724 CMP a4YTMP3,R5 FPS CORRECT? 
4404 024474 001401 BEQ 4 
4405 024476 000475 BR YERR3 
4406 024500 005737 024716 Y4: TST a4 YFLAG FINISHED TEST? 
4407 024504 001015 BNE Y5 
4408 024506 012737 177777 024716 MOV #-1,Q4YFLAG 
4409 024514 012737 024746 024720 MOV MYPAT10,a4YTMP1 
4410 024522 012737 024736 024722 MOV #YPATOO, a#YTMP2 
4411 024530 012737 000200 024724 MOV #200, a#YIMP3 
4412 024536 000726 BR Y1 


owe FPIIF FLTG PNT 
127 SUBD WITH AC=0 


4413 024540 


4442 024714 
4443 


4444 024716 
4445 024720 
4446 024722 
4447 024724 


4449 024726 
4450 024730 
4451 024732 
4452 024734 
4453 

4454 024736 
4455 024740 
4456 024742 
4457 024744 
4458 


4459 024746 


4462 024754 
4463 
4464 024756 


4467 024764 
4468 
4469 024766 


012737 
010537 
013737 
104151 
000424 


063146 
4th 44 


042104 
167356 
163146 
052525 
042104 
167356 
000000 
000000 
000000 
000000 


PRT A 
TEST 


000004 
024720 
024726 


024722 
024436 
024722 


024436 
001240 
024724 


MACRO M1111 


001246 


001236 
001242 


3: 
v6: 


v7: 


YERR1: 


1$: 
YERR2: 


YDATOO: 
YDATO1: 
YDATO2: 
YDATO3: 


YPATOO: 
YPATO1: 
YPATO2: 
YPATO3: 


YPAT10: 
YPAT11: 
YPAT12: 
YPAT13: 


YPAT20: 
YPAT21: 
YPAT22: 
YPAT23: 


YDONE : 


- WORD 


ee 
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YDONE 

#4 RO 
#YTMP1_RO 
#YDATOO,R1 
(RO)+,(R1)+ 


arYTMP2, AAS TMPC 
+147 

YDONE 

#Y2 ,AASTMP2 


#YDATOO. a#$TMPS 
a4YTMP2 , @ASTMP6 
+ 


ary TMP3, @ASTMPS 
+151 
YDONE 


0 
0 
0 
0 
0 
0 
0 
0 


962186 


167356 
163146 


:DATA FAILURE 


:XOR OF SIGN BIT 


sFAILED 
3 


;FPS WRONG. 


; XOR OF SIGN BIT 


SEQ 0106 


“mo 
= 


CKF PAAO 
127 


024766 


4478 


024770 


104412 


000456 


FP11F FLTG PNT PRT A 
SUBD WITH AC=0 TEST 


000224 
025240 
000200 


000200 
025260 
025224 


025230 


000004 
025224 


025226 
025222 


177777 
025250 
000210 


058524 


025034 
001240 


D9 
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025224 
025226 


025222 
025224 
025226 


001246 


001236 


RSE TUP 3GO INITIALIZE THE FPS AND STACK; AND 
7SEE IF THE USER HAS EXPRESSED 
THE DESIRE TO CHANGE THE SOF TWARE 
SVIRTUAL CONSOLE SWITCH a (HAS 
; THE USER TYPED CONTROL G 


5 z Rie, 2 ete A a ARM a Ta Rt A ee Bn 


T*TEST 30 ADDD WITH AC=0 TEST 


:@ 
;@ THIS IS A TEST OF ADDD WITH AC=0. BOTH 
:* POSITIVE AND NEGATIVE FSRC'S ARE TRIED. 


LRA R EERE REAR ERR E EERE EERE EERO R EER RERE RETA ERE E EEE 
TST30: SCOPE 

CLR ZFLA 

MOV 77PaT00, @47TMP1 ;P 

MOV #200, aaZTMP2 


LPERR ;SET UP THE LOOP ON ERROR ADDRESS. 
MOV #200,RO 
LDFPS RO ;SET DOUBLE MODE 
MOV #ZPAT20,RO 7SET ACO=0 
LDD (RO) ,ACO 
MOV a4ZTMP1 RO 
Ze: ADDD (RO) ,ACO i; TEST INSTRUCTION 
STFPS RS 
SETD 
MOV #ZDATOO,RO 7GET RESULT 
STD ACO, (RO) 
MOV #4 R2 
MOV a4Z7TMF1 RI RESULT CORRECT? 
73: C (RO)+,(R1)+ 
BEQ 74 
BR ZERR1 
74: SOB R2,Z3 
CMP aAZTMP2,R5 sFPS CORRECT? 
BEQ 25 
BR ZERR2 
75: TST @4Z7FLAG FINISHED TEST? 
BNE 6 - 


Z 
MOV #~1 ,@AZFLAG 
MOV #Z7PAT10,@4ZTMP1 
MOV #210, @4ZTMP2 
BR 21 


76: BR ZDONE 
ZFERR1: DATA FAILURE 
MOV #72, a4STMP2 
MOV @4ZTMP1 , a#STMP3 
MOV #ZPAT20, @ASTMPS 
MOV #ZDATOO, aASTMPS 
MOV @47TMP1 , aASTMP6 
1$: ERROR +152 
8R ZDONE 
ZERR2: 


MOV #72, QA4S™MP2 
MOV R5,a4STMP3 


SEQ 0107 





Aaa FPIIF FLTG PNT PRT A 
130 ADDD WITH AC=0 TEST 


4520 025210 
4521 025216 
1258 025220 
4524 025222 


4525 025224 
4526 025226 


ret 025246 
4538 025250 


ri tt 025256 
4543 025260 
4544 025262 
4545 025264 
rie 025266 


4548 025270 
025270 


025272 


304 
4564 025312 
4566 025316 
4567 025320 
4568 025326 
4569 025332 


MACRO M1111 


013737 025226 001242 
106153 


000423 


031463 
010421 
146314 
156735 


156735 


146314 


000000 


104412 


003240 
025654 
026232 


025332 
026242 


000244 


001236 


2DATO3: 


ZPATOO: 
ZPATO1: 
ZPATO2: 
ZPATO3: 


ZPAT10: 
ZPAT11: 
ZPAT12: 
ZPAT13: 


ZPAT20: 
ZPAT21: 
ZPAT22: 
ZPAT23: 


ZDONE : 


y*TesT 31 
-* 
:* THIS IS A 


** 
. 


WERASRARARERASASASELESASESESE SESE RE RRR SERRE RRR RRS RRR RRA SRR SRS S ES SD 


S121: 
AAI: 


SCOPE 


. F 
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MOV @AZ7TMP2. aASTMPS 
ERROR +153 
BR ZDONE 
-WORD 0 
Q 
0 
: .WORD 0 
0 
0 
0 
031463 
010421 
146314 
156735 
156735 
167356 
135673 
146314 
0 
0 
0 
0 
SE TUP 


;TEST TITLE:ADDF AND ADDD WITH E(AC)=E(FSRC) TEST AND (BUT FT) TEST 


CG AAA RERRREREREERRAERERAAARAEARRARARARRAEAREARE RAH 


:GO INITIALIZE THE FPS AND STACK; AND 
;SEE IF THE USER HAS EXPRESSED 

; THE DESIRE TO CHANGE THE SOF TWARE 
sVIRTUAL CONSOLE SWITCH REGISTER (HAS 
; THE USER TYPED CONTROL G?). 


SEE ABOVE COMMENT FOR TEST TITLE 


TEST OF THE ADD INSTRUCTION WITH THE 
:* OPERANDS HAVING EQUAL EXPONENTS. THE (BUF FT) 
;* FORK IN THE ROUND/TRUNK FLOWS IS ALSO TESTED. 


#3240,R0 


#AAPATO,RO 
(RO) ,ACO 


R 
#AAERRO, aer PvE” 


(RO) ,ACO 


;SET UP THE LOOP GN ERROR ADDRESS. 


SET FIV FIV FD AND F 
IN CASE THE OVER/UNDER 
FLOWS IN TRAP WILL 


“OCCUR 
SET UP ACO 
Z OPERAND 


:TEST INSTRUCTION 


SEQ 0108 


ip 


—o 
a 


CKFPAAO FPI1IF FLTG PNT PRT A 


131 


F 9 
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SEE ABOVE COMMENT FOR TEST TITLE 


4570 
4577 025334 


4579 025366 


012702 


026222 
026252 
000004 


026262 
026222 
000004 


AAS: 


#AADATO,RO 
ACO, (RO) 
MAAPAT2,R1 


#4 ,R2 
(RO) +, (R1)¢ 
AA? 
MAAPAT3,RO 


MALDATO,R1 
#4 ,R2 


; SHOULD TRUNCATE 
;GET THE RESULT 

2 CORRE QT? 

:DID (BuT FT) fal 





SEQ 0109 





KFPAAG FRPTTF §L TG PNT PRT A MACRO M1117 


77? 
, 


458) 


SEE ABOVE COMMENT FOR TEST TITLE 


025372 022021 AAS: 


G 9 
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(MP (RO)*, (R1)¢ 





SFQ 0170 





Sata FPIIF FLTG PNT PRT A MACRO M1111 
131 SEE ABOVE COMMENT FOR TEST TITLE 


4583 025374 001401 
seRe 025376 000561 


585 025400 077204 AAG: 
4586 025402 000137 025776 
4587 025406 077217 AA?7: 
4588 
4589 NOW 
4590 
4591 025410 AA10: 


0 106413 
4592 025412 012700 003200 
4594 025420 012700 026232 


4596 025426 012737 025440 001236 
4597 025434 012700 026242 


rte 025440 172010 AA11: 
4600 025442 012700 026222 AAl2: 


4602 025450 012701 026262 
000004 


4604 025460 022021 AA13: 


4606 025464 012700 026252 
4607 025470 012701 026222 
000004 


4611 025504 012700 026272 
4612 025510 012701 026222 
000004 


4617 025526 077204 AA16 
461 30 
4619 025532 077216 AA17 
4620 025534 000560 
4621 025536 077230 AA20 
4622 
4623 3 NOW 
4624 
4625 925540 AA21 
25540 104413 
6 025542 012700 003200 
4627 025546 170100 
4628 025550 012700 026232 
4629 025554 172410 , 
4630 025556 170001 
4631 025560 012737 025572 001236 
4632 025566 012700 026302 
4633 025572 172010 AA22: 
4634 
4635 025574 AA23: 


“6% 025574 170011 





H 9 
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BR 

SOB R2,AA5 
JMP @AAAERR2 
SOB R2, AAS 


AAG 
AAERR1 ;DATA ERROR 
; (BUT FT) ERROR 


TEST DOUBLE FLOATING ROUND MODE. 


V #3200,R0 : 
LDFPS RO 

V #AAPATO,RO 
LDD (RO) ,ACO 


MOV #AA11, aaSTMP2 
MOV #AAPAT1,RO 
ADDD (RO) ,ACO 


E 
=0 


SET UP ACO OPERAND 


TEST INSTRUCTION 


; SHOULD ROUND 


MOV MAADATO,RO 


STD ACO, (RO) 
MOV #AAPAT3,R1 
MOV 


#4,R 
CMP (RO) +,(Rid+ 
AA20 


MOV #AAPAT 2 ,RO 
MOV MAADATO,R1 


#4 ,R2 

CMP (RO)+,(R1)+ 
AA17 

MOV MAAPATS ,RO 


;GET THE RESULT 


; CORRECT? 
:DiD (BUT FT) FAIL? 


;WAS THE FLOATING 


MOV #2 ADATO,R1 ; CONSTANT USED 
MOV #4 R2 INSTEAD OF THE 
C (RO)+,(R1)+ ;DOUBLE CONSTANT 
BEQ AA16 IN THE ROUND 
BR AAERR3 ;F LOWS? 

SOB R2,AA15 ;DATA ERROR 

BR AAERR4 ; CONSTANT ERROR 

SOB R2,AA 

BR AAERRS_ ; (BUT FT) ERROR 


SOB R2,AA13 


TEST ADDF wITH FT=0, ROUND MODE 


LPERR : 

V #3200 .RO 
LDFPS RO 
MOV MAAPATO,RO 
LDD (RO) ,ACO 
SETF 


MOV MAAZ2 ,AASTMP2 
MOV MAAPATS ,RO 
ADDt (RO) ,ACO 


SET UP 1 LOOP ON ees: FE gente: 


FIV=1, FIV=1 


;LOAD ACO OPERAND 
sENTER FLOATING MODE 


ZS TEST INSTRUCTION 


; SHOULD ROUND 


RESET TO DOUBLE 
DE 


RROR ADDRESS. 


—_—_-— 


SEQ Q171 


~~ 


_ FPI1F FLTG PNT PRT A 


4638 025576 
4 602 


ret 3 025650 


6 
4657 025654 
8 025660 


5736 

4677 098720 
4678 
4679 

4680 025742 

5750 


4691 026030 
4692 026032 
4693 026040 
4694 026042 


026222 
026312 
000002 


026252 
026222 
000002 


026322 
001236 


0402 34 


000010 
000012 


026222 
026252 
026222 


026262 
026262 


MACRO M1111 
SEE ABOVE COMMENT FOR TEST TITLE 


001246 
001244 
001246 

2 
001244 


001246 
001246 





AACS: CMP 


ALS: CMP 


AA26: SOB 
BR 
MA2?7: S08 


;COME HERE IF A 


1. 
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Oya Syeagnemer mcm TMs meetin Ime 


SEQ 0112 

#AADATO,RO :GET THE RESULT 
ACO, (RO) 
MAAPAT6,R1 : CORRECT? 
#2,R2 
(RO)+,(R1)¢ 
AA27 
MAAPAT2,RO :WAS THE DOUBLE 
HAADATO.R1 “CONSTANT USED INSTEAD 
#2,R2 ‘OF THE FLOATING 
(RO) +,(R1) ;CONSTANT IN THE 
AA26 ROUND FLOWS? 
AAERAG :DATA ERROR 
AAERR? ;:CONSTANT ERROR 

AA24 
@AAADONE 


TRAP OCCURS TO 244. 


p2) 
Nm 
. 


AAERRO: MOV a4$TMP2,RO SEE IF THE TRAP WAS 
TST (RO) + sAT A TEST INSTRUCTION 
CMP RO, (SP) 
BEQ 1$ 
ng JMP aA4F PSPUR 
STST RO :GET FEC 
CMP RO,410 
BEQ $ ZS OVERFLOW 
CMP RO,A12 
BEQ 30$ ; UNDERF LOW 
BR 10$ 
20% 
20$: MOV (SP) ,@#$TMP2 ZREPORT OVERFLOW ERROR 
CMP (SP)+,(SP)+ 
21$ ERROR +154 
25$ JMP @4AADONE 
30$ MOV (SP) ,@&#$TMP2 ZREPORT UNDERFLOW 
CMP (SP) +, (SP) + ERROR 
31$ ERROR +155 
BR 25$ 
zADDD RESULT INCORRECT 
AAERR1: MOV MAAPAT 2, AASTMP6 
AAER10: MOV MAAPATO,@ASTMPS 
Vv #AAPAT1, @4$TMP3 
MOV #AADATO, * a4STMPS 
1$: ERROR +162 
BR AADONE 
AAERR2: MOV MAAPAT2 ,@ASTMP6 ; (BUT FT) FAILED. 
MOV MAAPATO ,a#STMPS 
MOV M#AAPAT1, @A4STMP3 
MOV M#AADATO, AAS TMPS 
1$: ERROR +156 
BR AADONE 
AAERR3: MOV #ASPAT3, AASTMP6 :DATA ERROR. 
BR AAER1 
AAERR4: MOV M#AAPAT3,a4$TMP6 ;RBAD CONSTANT 


“mo 


CKFPAAQ FP11F FLTG PNT PRT A 
SEE ABOVE COMMENT FOR TEST TITLE 


131 


4695 026050 


026306 
4745 026310 


4750 026322 
026322 


, Per ee 
hononore 
N 
Ww 
N 


= 
Nm 
NN 
WWW 
NN 


026232 
026242 
026222 


pceces 


026222 


026302 


026312 


026302 


026312 


MACRO M1111 


001246 


001240 
001242 
001244 
001246 


J_9 
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AAPAT1: 


AAPAT2: 


AAPAT3: 


AAPATS: 


AAPATS: 


AAPAT6: 


AADONE 


" RSETUP 


MAAPATO, AAS TMPS 
MAAPAT1 , AAS TMPS 
#AADATO, AAS TMPS 
+160 


AADONE 
MAAPAT3 , @ASTMPC 
MAAPATO, @ASTMPS 
MAAPAT 1 , @ASTMPS 
~<a tata 
* 


3 (BUT FT) FAILED. 


AADONE 
MAAPATS , @ASTMP3 
MAAPATO, AAS TMPS 
#AADATO, BAS TMPS 
HAAPAT6, BAS TMPE 
+160 


AADONE 
MAAPATS , AAS TMP3 
MAAPATO , @ASTMPS 
MAADATO, aA STMPS 
“ee 
+ 


AADONE 


sFD=0 AND 
;DATA ERROR 


; CONSTANT ERROR 


3GO INITIALIZE THE FPS AND STACK; AND 


SEQ 0113 


. 7 


ao 





oo FPIIF FLTG PNT PRT A 


4761 


026324 
4763 026326 
c6 


4789 026444 
790 


4 
4791 026450 

026450 
4792 026452 


4799 026502 
4800 026504 


012700 


003200 


026356 
027760 


030000 


027750 
030000 
000004 
027750 
027760 
000004 
027346 
027404 


027312 


003200 


026500 
027760 


027770 


027750 


MACRO M1111 
SEE ABOVE COMMENT FOR TEST TITLE 


001236 


001236 


kK 9 
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Soaieacd 


SEQ 0174 


SEE IF THE USER HAS EXPRESSED 

; THE DESIRE TO CHANGE THE SOF TWARE 
;VIRTUAL CONSOLE SWITCH REGISTER (HAS 
THE USER TYPED CONTROL G?). 


REE AAAEAEAREAERAERERERAAEAEEAEAAAAERAAARERAKAERERREEREK ERE ES 


ADDF & ADDD WITH ECAC) LESS THAN E(FSRC) TEST 


ATHIS IS _ATEST OF THE ADDD AND ADDF 
; INSTRUCTIONS AND THE ALIGN AC ALGORITHM 


; TEST 32 


;*FLOWS. 


THE CONSTANT (25 FOR FLOATING, 
THEN SIMPLE 


:*DOUBLE) USED IS CHECKED. 


57 FOR 


CASE ALIGNMENT SITUATIONS ARE 
NOTE E(AC) IS LESS THEN E(FSRC) 


e 
-—Abt eA RARER RRRARESARASRALERESASSARA RAR SARS SRR SRS SAR RR ARRAS SASS DS 


> *AND WORST 
; TRIED. 
18132: SCOPE 
CCl: 
LPERR 
V #3200, RG 
LDFPS 
MOV acC2, a#$TMP2 
MOV #CCPO,RO 
LoD (RO) ,ACO 
MOV #CCP2,RO 
(C2:  ADDD (RO) ,ACO 
STFPS 5 
MOV #CCDATO,RO 
STD ACO, (RO) 
MOV #CCP2,R1 
MOV #4 R2 
(C3: CMP (RO) +, (R1)+ 
BEQ CC6 
MOV #CCDATO,RO 
MOV #CCPO,RI1 
MOV #4 R2 
CC4: CMP (RO)+, (R1)+ 
BEQ cc5 
JMP a4CCER1 
CCS: SOB R2,CC4 
JMP aAcCER2 
CC6: SOB R2,CC3 
CMP R4_-RS 
BEQ CC? 
JMP aACCERO :BAD FPS. 
; EXPONENT DIFFERENCE=56=70 (OCT) FD=1 
LPERR 
MOV #3200,R4 
LDFPS RS 
MOV #CC8, a#STMP2 
MOV #CCPO,RO 
LDD (RO) ACO 
MOV ACCPI.RO 
cc8 ADDD (RO) ,ACO 
STFPS RS 
V #CCDATO,RO 


31S IT CORRECT 


:DID A BAD 
CONSTANT (NOT 57) 
GET GENERATED 


;BAD CONSTANT .D 
FPS CORRECT? 


;SET UP THE LOOP ON ERROR ADDRESS. 
SET FIV.FIV, AND FD 


SET ACO OPERAND 


EXPONENT DIFFERENCE=57=71 (OCT) FD=1 


:SET UP THE LOOP 7 ERROR ADDRESS. 
SSET FIV.FIV, AND FD 


;SET ACO OPERAND 
sACcO 


s TEST INSTRUCTION 
GET FPS 
GET THE RESULT 


te THE ALIGNMENT 
FLOWS? 
“DATA ERROR .D 


SRC 
eres! INSTRUCTION 
GET FPS 
[GET THE RESULT 


am 


CKF PAAO or FLTG PNT PRT A 


T32 


4801 026510 


4817 026566 
4818 
4819 026572 


4846 026712 

4847 

4848 026716 
716 


4855 026746 


174010 


030050 
000004 


027750 
027770 
000004 


027442 
027460 


027312 


026622 
027760 
003000 
030040 


027750 
030040 
000002 
027750 
030010 
000002 
027516 
027552 


027330 


026746 
030010 


003000 
030030 


MACRO M1111 
F & ADDD WITH E(AC) LESS THAN E(FSRC) TEST 


001236 


001236 


STD ACO, (RO) 
MOV #CCP7,R1 
MOV #6 R2 
CC9: CMP (RO)+,(R1)+* 
BEQ (C12 
MOV #CCDATO,RO 
MOV ACCPI RI 
MOV #4 R2 
(C10: CMP (RO)+,(R1)+ 
BEQ (£11 
JMP aFCCER3 
CC11: SOB R2,€C10 
JMP aACCER4 
cc12: SOB R2,€C9 
CMP R4_RS5 
BEQ Cci3 
JMP a*CCERO BAD 
; EXPONENT DIFFERENCE=25=31. (OCT) FD= 0 
LPERR 
MOV #CC14, a4STMP2 
MOV #CCPO.RO 
LDD (RO) ,ACO 
MOV #3000,.R4 
LDFPS R& 
MOV #CCP6,RO 
CC14: . ADDF (RO) ,ACO 
«STFPS RS 
SETD 
MOV #CCDATO,RO 
STD ACO, (RO) 
MOV #CCP6,RI1 
MOV #2,R2 
cC15: CMP (RO)+,(R1)+ 
BEQ CC18 
MOV ACCDATO.RO 
MOV #CCP3,R1 
MOV #2,R2 
CC16: CMP (RO) +, (R1)+ 
BEQ CC17 
JMP aACCERS 
(C17: SOB R2,CC16 
MP arc CER6 
(C18: SOB R2,CC15 
CMP 4-R5 
BEQ cci 
JMP 
; EXPONENT DIFFERENCES _ 30 (ocr) PDE As 
LPERR 
MOV #CC20, awSTMP2 
MOV #CCP3.RO 
LDD (RO) ACO 
MOV #3000,R4 
LDFPS  R& 
MOV #CCPS RO 
(C20: ADDF (RO) ACO 


. 
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31S IT CORRECT 


:DID A BAD 
; CONSTANT (NOT 57) 


BAD CONSTANT .D 
FPS CORRECT? 


SET UP ACO OPERAND. 
SET FIV,FIV. CLEAR FD. 


sFSRC 
: TEST INSTRUCTION 


;REENTER DOUBLE MOVE 
;GET THE RESULT 


31S THE RESULT CORRECT? 


:DATA ERROR F 
;BAD CONSTANT F 


SET UP ACO OPERAND. 
SET FIV.FIV. CLEAR FD. 


ZF SRC 
sTEST INSTRUCTION 






SEQ C115 


‘fon GENERATED 
; FOR > AL I GNMENT 


;FLOWS? 
[DATA ERROR.D 


PS. 


SET UP THE LOOP ON ERROR ADDRESS. 


WAS A BAD CONSTANT 
“USED (NOT 25) IN 
THE ALIGN FLOWS? 


PS. 


SET UP THE LOOP ON ERROR ADDRESS. 


——_ 


M9 | 
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ADDF & ADDD WITH E(AC) LESS THAN E(FSRC) TEST SEQ 0116 
4856 026750 170205 STFPS RS 
4857 026752 170011 SETD ;REENTER DOUBLE MOVE 
4858 026754 012700 027750 MOV #CCDATO,RO ‘GET THE RESULT 
4859 026760 174010 STD ACO, (RO) 

012701 030060 MOV #CCP10,R1 rI1S THE RESLT CORRECT? 

4861 026766 012702 000002 MOV #2.R2 
4862 026772 022021 CC21: CMP (RO) +, (R1)+ 
4863 026774 001415 BEQ CC24 
4864 026776 012700 027750 MOV ACCDATO,RO WAS A BAD CONSTANT 
4865 027002 012701 030030 MOV ACCP5 RI “USED (NOT 25) IN 
4866 027006 012702 000002 MOV #2,R2 [THE ALIGN FLOWS? 
4867 027012 022021 (C22: CMP (RO) +, (R1)+ 
4868 027014 001402 BEQ CC23 
4869 027016 000137 027606 JMP aACCER7 :DATA ERROR F 
4870 027022 077205 (C23: SOB R2,CC22 
4871 027024 000137 027624 IMP @#CCER8 ;BAD CONSTANT F 
4872 027030 077220 (C24: SOB R2,CC21 
4873 027032 020405 CMP R4_RS 
4874 027034 001402 BEC CC25 
4875 027036 000137 027330 JMP aeCCER9O :BAD FPS. 
4876 sEXPONENT DIFFERENCE=1 FD=1 
4877 027042 CC25: 

027042 104413 LPERR ;SET UP THE ae * 4 ERROR ADDRESS. 
4878 027044 012704 003200 MOV #3200, RG “SET FIV.FIV, 
4879 027050 170104 LDFPS 
4880 027052 012737 027072 001236 MOV aC 26, a#$TMP2 
4881 027060 012700 027760 MOV #CCPO.RO :SET ACO OPERAND 
4882 027064 172410 LDD (RO) ACO 
4883 027066 012700 030010 MOV #CCP3,RO FSRC 
4884 027072 172010 (C26: ADDD  (RO),ACO :TEST INSTRUCTION 
4885 027074 170205 STFPS R5 GET F 
4886 027076 012700 027750 MOV #CCDATO,RO :GET THE RESULT 
4887 027102 174010 STD ACO, (RO) 
4888 027104 012701 030070 MOV #CCP11,R1 zIS IT CORRECT 
4889 027110 012702 000004 MOV #4_R2 
4890 027114 022021 CC27: CMP (RO) +, (R1)+ 
4891 027116 007415 BEQ CC 
4892 027120 012700 027750 MOV #CCDATO,RO :DID A BAD 
4893 027124 012701 030010 MOV #CCP3,Ri “CONSTANT (NOT 57) 
4894 027130 012702 000004 MOV #4 R2 [GET GENERATED 
4895 027134 022021 CC28: CMP (RO)+,(R1)+ :FOR THE ALIGNMENT 
48% 027136 001402 BEQ CC29 FLOWS? 
4897 027140 000137 027660 JMP a#CCER10 [DATA ERROR.D 
4898 027144 077205 (C29: SOB R2,CC28 

137 027676 IMP a#CCER11 ;BAD CONSTANT .D 

4900 027152 077220 Cc30: SOB R2,CC27 
4901 027154 020405 CMP R4_RS5 :FPS CORRECT? 
4902 027156 001402 BEQ 1 
4903 027160 000137 027312 JMP a*CCERO :BAD FPS. 
4904 sEXPONENT DIFFERENCE=100=144 (OCT) FD=1 
4905 027164 (C31: 

027164 104415 LPERR :SET UP THE LOOP S ERROR ADDRESS. 

027166 012704 003200 MOV #3200,R4 ‘SET FIV.FIV, AND FD 
4907 027172 170104 LDFPS R 
4908 027174 012737 027214 001236 MOV #CC32,a#$TMP2 
4909 027202 012700 027760 MOV #CCPO.RO :SET ACO OPERAND 
4910 027206 172410 LDD (RO) ,ACO 


A aaaas FP11F_FLTG PNT PRT A 
132 ADDF 


MACRO M1111 


_ NY 
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& ADDD WITH E(AC) LESS THAN E(FSRC) TEST 


4911 027210 012700 030020 
4912 027214 172010 
4913 027216 170205 
4914 027220 012 027750 
4915 027224 174010 
4916 027226 012701 030020 
4917 027232 012702 000004 
4918 027236 022021 
4919 027240 001415 
4920 027242 2700 027750 
4921 0272466 012701 030020 
4922 027252 012702 000004 
4923 027256 022021 
4924 0272 001402 
4925 027262 137 027714 
0272 077205 
4927 027270 137 027732 
4928 027274 077220 
4 027276 02040 
027300 ponees 


027312 


030110 
4941 027346 012737 030000 


030000 
4943 027362 012737 027760 
4944 027370 012737 027750 


000137 030110 
012737 030000 


030000 
4949 420 012737 027760 
4950 027426 Hi 14 027750 


4952 027436 000137 030110 
4953 027442 012737 027770 
4954 027: 12737 030050 
4955 027456 741 


2737 027770 


2737 027750 


4960 027510 104173 
4961 027512 000137 030110 
4962 027516 012737 030040 
4963 027524 012737 030040 
4964 027532 012737 027760 
4965 027540 012737 027750 
4966 027546 10417 
4967 027550 000557 


MOV #CCP4,RO 
(C32: ADDD (RO),ACO 
STFPS RS 
V #CCDATO,RO 
STD ACO, (RO) 
MOV #CCP4,R1 
MOV #4 R2 
CC33: CMP (RO)+, (R1)+¢ 
BEQ (C36 
MOV #CCDATO,R0 
MOV #CCP4,RI 
MOV #4 R2 
(C34: CMP (RO) +, (R1)+ 
BEQ CC35 
JMP @ACCER12 
CC35: SOB R2,C034 
JMP a4CCER13 
(C36: SOB R2,(C33 
CMP R4.R 
BEQ cc 37 
JMP a#CCERO 
(C37: JMP aC CDONE 
CCERO: MOV R4, @ASTMPG 
V R5. a#STMP3 
1$: ERROR +164 
JMP a4#CCDONE 
CCER9O: MOV R4, @ASTMPS 
MOV R5. aS TMP3 
1$: ERROR +165 
JMP CD 
001240 CCER1: MOV #CCP2, aASTMP3 
001246 MOV ACCP2. aS TMP 
001242 CCERSO: MOV #CCPO, a4STMP4 
001244 V #CCDATO, a#$TMPS 
1$: ERROR +166 
JMP aC CDONE 
001240 CCER2: MOV #CCP2, a#STMP3 
001246 MOV #CCP2, aASTMPC 
001242 CCER22: MOV #CCPO, a#STMP4 
001244 MOV #CCDATO, a#STMPS 
1$: ERROR +172 
JMP @4#CCDONE 
001240 CCER3: MOV #CCP1, aASTMP3 
001246 mov WCCP 7 aWS TMP 
001240 CCER4: MOV #CCP1, a4STMP3 
1246 MOV #CCP7, a#STMPO 
001242 CCER44: MOV #CCPO. a#STMP4 
001244 V ACCDATO, a#$STMPS 
1$: ERROR +173 
JMP aC CDONE 
001240 CCERS: MOV ACCP6, AASTMP3 
001246 MOV #CCP6. aASTMP6 
001242 CCERSS: MOV #CCPO. aS TMP4 
001244 a MOV #cCDATO, aS TMPS 


ERROR +17 
BR CCDONE 


SEQ 0117 


SRC 
TEST II INSTRUCT ION 
ZGET THE RESULT 


:1S IT CORRECT 


:DID A BAD 
CONSTANT (NOT 57) 


SGET GENERATED 
a THE ALIGNMENT 


LOWS? 
‘DATA ERROR .D 


;BAD CONSTANT .D 
FPS CORRECT? 
;BAD FPS. 

FPS ERROR D 


FPS ERROR F 


DATA ERROR D 


CONSTANT BAD D(B) 


: CONSTANT BAD D(G) 


DATA ERROR F 


8 10 
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F & ADDD WITH ECAC) LESS THAN E(FSRC) TEST SEQ 0118 
4968 027552 012737 030040 001240 CCER6: MOV #CCP6,a4STMP3 =: CONSTANT BAD F (8B) 
4969 027560 012737 030040 001246 MOV #CCP6. a#STMP6 
4970 027566 012737 027760 001242 MOV #CCPO, a#STMPG 

4971 027574 012737 027750 001244 MOV #CCDATO, a*$TMPS 
4972 027602 104174 1$: ERROR +174 
4973 027604 000541 BR CCDONE 
4974 027606 012737 030030 001240 CCER7: MOV #CCPS, @#STMP3 =: DATA ERROR F 
4975 027614 012737 030060 001246 MOV #CCP10, aS TMPG 
4976 027622 000743 BR CCERSS 
4977 027626 012737 030030 001240 CCER8: MOV #CCP5,a@#STMP3 =: CONSTANT BAD F(G) 
4978 027632 012737 030060 001246 MOV #CCP10, a#STMPC 
4979 027640 012737 027750 001244 MOV ACCDATO, af$TMPS 

027646 012737 027760 001242 MOV #CCPO, a#STMPG 
4981 027654 104175 1$: ERROR +175 
4982 027656 000514 CCDONE 

027660 012737 030010 001240 CCER10: MOV ACCP3,a#$TMP3 =: DATA ERROR D 

027 012737 030070 001246 MOV #CCP11, a#STMP6 
4985 027674 32 BR CCERSO 
4986 027676 012737 030010 001240 CCER11: MOV aCeP3, @a#STMP3 —-: CONSTANT BAD D(G) 
4987 027 012737 030070 001246 MOV #CCP11, a#STMPG 
4988 027712 000670 BR CCERG4 
4989 027714 012737 030020 001240 CCER12: MOV ACCP4,@4STMP3 =: DATA ERROR D 
4990 027722 012737 030020 001246 MOV #CCP4,@ASTMP6 
4991 027730 000614 BR CCERSO 
4992 027732 012737 030020 001240 CCER13: MOV ACCP4,@ASTMP3 CONSTANT BAD D(B) 
4993 027740 012737 030020 001246 MOV #CCP4. aASTMPE 
4994 027746 000624 BR CCER22 
4995 027750 000000 CCDATO: 0 
4996 027752 000000 0 
4997 027754 000000 0 
4998 027756 000000 0 
4999 027760 000200 ccPO: 200 SE (AC) =1 

027762 000000 0 
5001 027764 000000 0 | 
5002 027766 000000 0 . 
5003 027770 016200 CCP1: 16200 E(FSRC)= E (AC) +56= 57 
5004 027772 000000 0 : =71(0CT) 
5005 027774 000000 0 
5006 027776 000000 0 
5007 030000 016400 CCP2: 16400 FE (FSRC)=E (AC) #57=58 
5008 030002 000000 0 : 72(0CT? 
5009 030004 000000 0 
5010 030006 000000 0 
5011 030010 000400 CCP3: 400 ZE (CF SRC) =E (AC) +1=2 
5012 030012 000000 0 
5013 030014 000000 0 
5014 030016 000000 0 
5015 030020 031200 CCP4: 31200 ZE (CF SRC) =E (AC) +100=101=145(0CT) 
5016 030022 000000 0 
5017 030024 000000 0 
5018 030026 000000 0 
5019 030030 006200 CCP5: 6200 ECF SRC) =E (AC) #24=25=31(0CT) 
5020 030032 000000 0 
5021 030034 000000 0. 
5022 030036 000000 0 
5023 030040 006400 CCP6: 6400 ECF SRC) =E (AC) #25=26=32(0CT) 
5024 030042 000000 0 


C 10 


one PAAQ FP11F FLTG PNT PRT A 
ADDF 


5045 
5056 
5057 


030112 
5058 
5059 030114 

030114 
5060 030116 
5061 030122 
5062 030124 
5063 030132 
5064 


5074 030174 


003200 


030752 
030152 


031314 
031304 


031264 


031314 
000004 


MACRO M1171 
& ADDD WITH E(AC) LESS THAN E(FSRC) TEST 


000244 
001236 


C_10 
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SEQ 0119 
6 
CCP?: wanes :CCP1 RES 
0 
CCP10: sere CCP5 RES 
0 
0 
CCP11: . :CCP3 RES 
0 
CCP12: 200 ;BAD CONSTANT 
ZRES CCP2,CCP4 
0 
CCDONE : 
RSE TUP 


IF THE USER HAS EXPRESSED 
; THE DESIRE TO CHANGE THE SOF TWARE 
[VIRTUAL CONSOLE SWITCH REGISTER (HAS 
[THE USER TYPED CONIROL G?). 


;TEST TITLE:ADDF AND ADDD WITH E(AC) GREATER THAN E(FSRC) TEST 


SL AAR ERE RE REAEEREEEEEKERERERERAREREREREREERERERERREERREEER ERED 


:*TEST 33 SEE ABOVE COMMENT FOR TEST TITLE 


THIS IS A TEST OF THE ADDD AND ADDF 

;* INSTRUCTIONS AND THE ALIGN FSRC ALGORITHM 
:*FLOWS. FIRST THE CONSTANT USED IS "racic 
;*THEN SIMPLE AND WORST CASE ALIGNMEN 
;*SITUATIONS ARE TRIED. NOTE ECAC) 

:*1S GREATER THAN E(FSRC). 


i INITIALIZE THE FPS AND STACK; AND 


** 
Perret tii titiitiiitittti titi tit it titi itt t titi itt i tt titi iii i sits 
1S$133: SCOPE 
iEXPONENT DIFFERENCE=57=71 (OCT) FD=1 
LPERR :SET UP THE LOOP ON ERROR ADDRESS. 
MOV #3200,R4 SSET FIV FIV, AND FD 
LDFPS R 
MOV ABBERO,a4FPVECT :SET UP FOR ERROR 
MOV #BB2,a4$TMP2 :IN CASE THE OVER\ 
SUNDER FLOWS FAIL. 
MOV #BBPAT2,RO :SET ACO OPERAND. 
LDD (RO) ,ACO 
MOV #BBPAT1,RO SF SRC 
BB2: ADDD (RO) ACO *TEST INSTRUCTION 
BB3: MOV #BBDATO,RO :GET THE RESULT 
STD ACO, (RO) 
MOV T2,R1 :RESJLT CORRECT? 
MOV #4 _R2 
BRG : CMP (RO) +,(R1)+ 





CKFPAAO FP1IF FLTG PNT PRT A 
133 SEE ABOVE COMMENT FOR TEST TITLE 


5075 030176 
5076 030200 
5077 030204 


5078 
5079 030206 
5080 030210 
5081 030212 
5082 


001402 
000137 
077205 


37 
077205 


031012 


030752 


003200 
030246 
031334 
031304 
031264 
031374 
000004 


031264 
031334 
000004 


031050 
031066 


030752 


030370 
031274 
003000 
031304 


031264 
031274 
000002 


031122 


MACRO M1111 


BBS: 


JMP @ABBERO sFPS ER 
 Aamnes DIFFERENCE=56=70 (OCT) FD=1 


001236 


BB11: 


BB12: 
BB13: 


JMP @a4BBERO ;BAD FP 
vam DIFFERENCE=25=31 (OCT) FD=0 


001236 


BB15: 


D_10 
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LPERR 


LPERR 
V 


BB5 
@4BBER1 
R2 BBS 


R4,RS 
BB6 


0,R1 
#4_R 
(RO)+,(R1)+ 
BB13 


#BBDATO,RO 
#BBPATS ,R1 


#4 R2 
5 aaa 


#BB15 ,a#$TMP2 
#8BPATO,RO 


(RO) ACO 
#3000 ,R4 


R4 

#BBPAT1 ,RO 
(RO) ,ACO 
R5 


#BBDATO,RO 
ACO, (RO) 
#BBPATO,R1 
#2,R 
(RO) +, (R1)+ 
BB17 


@ABBE RS 
R2,BB"6 


SEQ 0120 


DATA ERROR D 
WAS FPS CORRECT? 


ROR 


SET UP THE LOOP ON ERRGR ADDRESS. 
SET FIV.FIV, AND FD 


;SET ACO OPERAND 


sFSRC 

s TEST INSTRUCTION 
;GET FPS 

;GET THE RESULT 
z1S IT CORRECT 


:DID A BAD 

; CONSTANT (NOT 57) 
;GET GENERATED 
:FOR THE ALIGNMENT 
sFLOWS? 

;DATA ERROR.D 

;BAD CONSTANT .D 
sFPS CORRECT? 


S$. 


;SET UP THE LOOP ON ERROR ADDRESS. 
;SET UP ACO OPERAND 

7SET FIV AND FIV 

7 CLEAR FD 

FSRC 

ZTEST INSTRUCTION 


s;REENTED DOUBLE MODE. 
GE? THE RESULT 


31S THE RESULT 
; CORRECT? 


;DATA ERROR F 





E_10 
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133 SEE ABOVE COMMENT FOR TEST TITLE SEQ 0121 

5130 030426 020405 CMP R4 RS ZS FPS CORRECT? 

$131 030630 001402 . BEQ BB20 

§132 030432 000137 030772 JMP @#BBER10 :FPS ERROR. 

5133 ZEXPONENT DIFFERENCE=24=30 (OCT) 

$134 030436 8B20: 
030436 1046413 LPERR ;SE’ UP THE LOOP ON ERROR ADDRESS. 

5135 030440 012737 030466 001236 MOV #BB21, aASTMP2 

5136 030446 012700 031324 MOV #RBPAT3,RO :SET UP ACO OPERAND. 

5137 030452 172410 LDD (RO) ,ACO 

5138 030454 012704 003000 MOV #3000,R4 ;SET FIU,FIV. CLEAR FD. 

5139 030460 170104 LDFPS RG 

5140 030462 012700 031304 MOV #BBPAT1,RO sF SRC 

5141 0304 172010 BB21: ADDF (RO) ,AC9 STEST INSTRUCTION 

5142 030470 170205 STFPS RS 

5143 030472 170011 SETD ZREENTER DOUBLE MODE 

5144 030474 012700 031264 MOV ABBDATO,RO GET THE RESULT 

5145 030500 174010 STD ACO, (RO) 

$146 030502 012701 031364 MOV #BBP7 RI :1S THE RESULT CORRECT? 

5147 030506 012702 000002 MOV #2,R2 

$148 030512 022021 BB22: CMP (RO)+,(R1)+ 

5149 030514 001415 BEQ BB25 

5150 030516 012700 031264 MOV #BBDATO,RO :WAS A BAD CONSTANT 

5151 030522 012701 031324 MOV #BBPAT3.R1 [USED (NOT 25) IN 

5152 030526 012702 000002 MOV #2,R2 [THE ALLIGN FLOWS? 

5153 030532 022021 BB23: CMP (RO) +, (R1)+ 

5154 030534 001402 BEQ BB24 

5155 030536 000137 031156 JMP @ABRERS :DATA ERROR F 

5156 030542 077205 RB24: SOB R2 ,BB23 

5157 030544 000137 031174 MP @ABBE RG :BAD CONSTANT F 

5158 030550 077220 BB25: SOB R2,BB22 

5159 030552 020405 " CMP R4_RS 

5160 030554 001402 ’ BEQ BB26 

5161 030556 000137 030772 JMP @#ABER10 :BAD FPS. 

5162 sEXPONENT DIFFERENCE=1 

5163 030562 8B26: 
030562 104413 LPERR ;SET UP THE LOOP ON ERROR ADDRESS. 

5164 030564 012737 030612 001236 MOV #BB27 , aASTMP2 

$165 030572 012704 003200 MOV #3200.R4 

5166 030576 170104 LDFPS RG ;SET UP ACO OPERAND 

5167 012700 031344 MOV #BBPATS RO 

5168 030604 172410 LDD (RO) ,ACO 

5169 030606 012700 031304 MOV #BBPAT1,RO :F SRC 

5170 030612 172010 BB27: ADDD (RO) ,ACO ZTEST INSTRUCTION 

5171 030614 170205 STFPS RS 

5172 030616 012700 031264 MOV #BBDATO,RO :GET THE RESULT. 

5173 030622 174010 STD ACO, (RO) 

5174 030624 012701 031404 MOV #BBP11,R1 sI1S IT CORRECT? 

5175 030630 012702 000004 MOV #4 R2 

5176 030634 022021 BB30: CMP (RO) +, (R1)+ 

5177 030636 001402 BEQ BB31 

5178 030640 000137 031230 JMP @ABBER7 :DATA ERROR D 

5179 030644 077205 BB31: $08 R2,BB30 

5180 030646 020405 CMP R4-R5 s1S FPS CORRECT 

5181 030650 001402 BEO BBS2 

5182 030652 000137 030752 JMP @ABBERO 

5183 sEXPONENT DIFFERENCE=100=144 (OCT) 

5184 030656 BB32: 





Ein ea ae ee id 
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133s SEE_ ABOVE COMMENT FOR TEST TITLE SEQ 0122 T 
030656 104413 LPERR ;SET UP THE LOOP ON ERROR ADDRESS. 

5185 0 012737 030706 001236 MOV #8833, aeSTMP2 

5186 0 012704 003200 MoV —- #3200. R4 

5187 030672 170104 LDFPS RG SET 4 FIV AND FD 

5188 030674 012700 031354 MOV - #BBPAT6, RO SET UP ACO GPERAND. 

5189 030700 172410 LDD (RO) .ACO 

5190 030702 012700 031304 MOV § #BBPAT1,RO ZF SRC 

5191 030706 172010 8433:  ADDD (RO) ,ACO TEST INSTRUCTION 

5192 030710 170205 STFPS RS 

5193 030712 012700 031264 MOV #BBDATO, RO GET THE RESULT 

5194 030716 174010 STD —ACO, (ROS 

5195 030720 012701 031354 MOV - ABBPAT6,R1 1S IT CORRECT 

5196 030724 012702 000004 MOV «#4, R2 

5197 030730 022021 BB34: CMP (RO) +, (R1)+ 

5198 030732 001402 BEQ  BB35 

5199 030734 000137 031246 JMP —- @A#BBERB DATA ERROR D 

5200 030740 077205 BB35: SOB = R2, BR34 

5201 030742 020405 (MP RG_RS 1S FPS CORRECT . 

5202 030744 001002 BNE —- BBERO 

5203 030746 000167 000442 JMP ——-BBDONE 

5204 030752 010437 001242 BBERO: MOV = R4,a#STMP4 :FPS ERROR D 

5205 030756 010537 001240 MOV —- RS. awSTMP3 

5206 030762 104164 1$: ERROR +164 

5207 030764 104412 RSETUP 3GO INITIALIZE THE FPS AND STACK; AND 
SEE IF THE USER HAS EXPRESSED 
THE DESIRE TO CHANGE THE SOFTWARE 
VIRTUAL CONSOLE SWITCH REGISTER (HAS 
THE USER TYPED CONTROL G?). 

5208 030766 000137 031414 JMP —- @#BBDONE 

5209 030772 010437 001242 BBER10: MOV —-R4 a#STMP4 :FPS ERROR F 

5210 030776 010537 001240 MOV —s- RS. a#STMP3 

5211 031002 104165 18: ERROR +165 

5212 031004 104412 RSE TUP :GO INITIALIZE THE FPS AND STACK; AND 
SEE IF THE USER HAS EXPRESSED 
THE DESIRE TO CHANGE THE SOFTWARE 
:VIRTUAL CONSOLE SWITCH REGISTER (HAS 

: ; THE USER TYPED CONTROL G?). 

5213 031906 000137 031414 JMP —- @WBBDON 

8514 031012 012737 031314 001242 BBERI: MOV  #BBPAT>.@#STMP4 :DATA ERROR D 

5215 031020 012737 031314 001246 MOV - #BBPAT2. aw STMP6 

5216 031026 012737 031304 001240 BBER11: MOV —« #BBPAT 1. a#STMP3 

217 031034 012737 031264 001244 MOV —- #BRDATO. aw $TMP5 

5218 031042 104166 1$: ERROR +166 

5219 031044 000137 031414 JMP -- @#BBDONE 

5220 031050 012737 031334 001242 BBER2: MOV #BBPAT4. aw#STMP4 

5221 031056 012737 031374 001246 MOV - #BBP10, a#STMP6 

5222 031064 000760 BR BBER11 

5223 031066 012737 031334 001242 BBER3: MOV § #BBPAT4,aWSTMP4 :BAD CONSTANT D 

5224 031074 012737 031374 001246 MOV «BBP 10, a#STMP6 

5225 031102 012737 031304 001240 MOV -« ABBPAT 1. a#STMP3 

5226 031110 012737 031264 001244 MOV #BBDATO. aw$TMP5 

5227 031116 104167 1$: ERROR +167 

5228 031120 000535 BR BBDONE 

229 031122 012737 031274 001242 BBER4: MOV § #BBPATO,aMSIMP4 DATA ERROR F 

5230 031130 012737 031274 001246 MOV —« #BBPATO. a#$TMP6 

5231 031136 012737 031304 001240 BBERGO: MOV §- #BBPAT1_a#$IMP3 

5232 031144 012737 031264 001244 MOV - #BBDATO. aw $TMPS 


rr ————————————————— a a Tas — eee SN rf 
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3 SEE ABOVE COMMENT FOR TEST TITLE SEQ 0123 
104170 1§: ERROR +170 
000517 by BRD ONE 
012737 031324 Ovl2s2 SRERS: #BBPAT3, a&$TMP< 
012737 031364 001246 MOV #BBP7, at TMP6 
72 000761 BR BRER4O 
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733 SEE ABOVE COMMENT FOR TEST TITLE 
$239 031176 012737 031324 0012462 


BRERE: 


MOV 


MBBPATS ,aM$™MP4 ; CONSTANT FRROR F 


SEQ 0124 


mo 


a ry 
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133 SEE ABOVE COMMENT FOR TEST TITLE SEQ 0125 


5241 031202 012737 031364 001246 MOV #BBP7 , AAS TMP 
5242 031210 012737 031304 001240 MOV #BBPAT1 , aA STMP3 

031264 001244 MOV #BBDATO, a#$TMPS 
04171 1$: ERROR +171 


000472 BR BBDONE 
2737 =031344 001242 BBER7: MOV —= #BBPATS,a#$TMP4 
2737 031304 001246 MOV #BBPAT 11, a#$TMP6 
py sa BR BBER11 
2 


Aa 


737 =031354 001242 BBER8: MOV #BBPAT6 , aA STMPS 
737 =031354 001246 MOV + ht aan 


ie 

g 

= 
Tooce g 
8 


oF CAC) =E (CF SRC) +25=26 

- =32¢0CT) 

5258 031 

5259 031302 

5260 031304 000200 BRPAT1: 

5261 031306 000000 

5262 031310 000000 

5263 031312 000000 

5264 031314 016400 BBPAT?2: 
000000 


So 
So 


sECF SRO) =1 


ao 
~ 
So 
So 


7E (AC) =E CF SRC) +57=58 
: =72(0CT) 


7 ECAC) =E CF SRO) #26=25 
: =31(0CT) 


ise) 
So 
So 


000000 
5268 031324 sana BBPAT3: 


6200 7E (AC) =E CF SR6) +56=57 


000000 
5272 031334 016200 BRPATS: 
000000 : =71(OCT) 


000000 
5276 031344 000400 BBPATS: 400 SE (AC) =E CF SRO) +1=2 
000000 


000000 
31354 031200 BBPAT6: 


80 031354 
5281 031356 
82 031360 


+ 
~ 
So 
So 


7 E (AC) =E (CF SRC) +100=101 
j =145(0CT) 


5284 031364 006200 BBP?: 
00000 


8 


;BBPAT3 RES 


s 


000000 
5288 031374 016200 BBP 10: ;BBPAT4 RES 
5289 031376 000000 
5290 031400 000000 
5291 031402 000001 


5292 031404 000500 BBP11: 
000000 


=) 
oO 


;BBPATS RES 


) 
0 
0 
2 
0 
0. 
0 
1 
0 
0 
0 
6 
0 
0 
0 
1 
9) 
0 
5275 031342 
0 
a. 
0 
3 
0 
0) 
0 
6 
1 
0 
0 
1 
0 
0 
1 
5 
0 
Q 
0 


000000 
5295 031412 000000 
031414 104412 RSE TUP 360 INITIALIZE THE FPS AND STACK; AND 





CKF 
133 


PAAQ FPITIF FLTG PNT PRT A 
SEE ABOVE COMMENT FOR TEST TITLE 


5304 


031416 
5306 031420 


5329 0315 
330 031532 
5331 031536 


5333 031542 
5335 031546 


606 
031610 


000004 


104413 


012701 


003200 


031450 
033300 


033300 


033260 


033400 


000004 


033260 


032510 
032546 
000010 


032472 


003200 


031576 
033310 


033300 


033260 
033270 


MACRO M1111 


J 
26-SEP=79 09:38 PAGE 19-1 


10 


SEQ 0126 


;SEE IF THE USER HAS EXPRESSED 

THE DESIRE TO CHANGE THE SOF TWARE 

; VIRTUAL CONSOLE SWITCH REGISTER (HAS 
THE USER TYPED CONTROL G?). 


RRR AAA A REAR AAAEERERAAEEAARRAAKEAEAAREREARERRREHERE 


ADDD WITH NEGATVE OPRANDS TEST 


TSTEST 36 


SeTHIS IS A TEST OF THE ADDD INSTRUCTION 
EVERY COMBINATION OF 


;*WITH NEGATIVE OPERANDS. 
;*OPERAND SIGNS IS TRIED. 


** 

TST34: SCOPE 

oe OPERANDS NEGATIVE 
LPERR 
MOV #3200,R4 
LDFPS RG 

001236 MOV #DD2,a4STMP2 

MOV #DDP1,RO 
LDD (RQ) ,ACO 
MOV #DDP1,RO 

DD2: ADDD (RO) ,ACO 
STFPS R5 
MOV #DDDATO,RO 
STD ACO, (RO) 
MOV #DDP9,R1 
MOV #4,R2 

DD3: CMP (RO) +, (R1)+ 
BEQ DD6 
MOV #DDDATO,RO 
MOV #DDP4,R1 

; MOV #4,R2 

DD4: CMP (RO) +,(R1)+ 
BEQ DDS 
JMP @ADDERI 

DDS: SOB R2,DD4 
JMP @ADDER2? 

DD6: SOB R2,DD3 
BIS #10,R4 
CMP R4,R5 
BEQ D7 
JMP @ADDERO 

zAC POS FSRC NEG 

DD?: 
LPERR 
MOV ereer. R4 
LDFPS 

001236 MOV 2008 owe 

MOV #DDP2,R 
LDD oe) het 
MOV #DDP1,RO 

DDB: ADDD (RO) ,ACO 
STFPS 
MOV #DDDATO,RO 
STD ACO, (RO) 
MOV #DDPO0,R1 


~~ 
WEAR RARRRAARRASARRRARARRAR RAR RRR RR RRRRR RRR RRR RRR RRR RRR RRR RRS DE SD 


AC=-F SRC 





eer UP e LOOP ON — ADDRESS. 


SET ACO OPERAND 


sESRC 

‘t's INSTRUCTION 
ZGET FPS 
:IS IT CORRECT 


;DID A ADD-SUB 
7FLOW A FAILURE 


3216,442,500 
;DATA ERROR,D 
FLOW FAILURE ,D 


sFPS CORRECT? 
;BAD,FPS 


THE LOOP ON aa 


SET ACO OPERAND 


z1S IT CORRECT 


FIV, AND F 


3GET THE RESJLT 


sSET FIO, FIV 


SPC 
sTEST.IN IN. TRUCTION 
:GET THE RESULT 


: 


mca 
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134 ADDD WITH NEGATVE OPRANDS TEST SEQ 0127 

5347 031614 012702 000004 MOV #4 R2 

5348 031620 022021 DD10: CMP (RO) +,(R1)+ 

349 031622 001402 BEQ pD11 

5350 031624 000137 032604 JMP ADDERS FLOW FAILURE 
5351 031630 077205 pD11: S08 R2,DD10 

5352 031632 052704 000004 BIS #4 RG 

5353 031636 020405 CMP R4-RS FPS CORRECT? 
5354 031640 001402 BEQ Ddi2 

5355 031642 000137 032472 JMP @ADDERO ;BAD FPS 

5356 :AC_NEG FSRC POS AC==F SRC 

5357 031646 bpie2: 

031646 104413 LPERR SET UP THE LOOP ON ERROR ADDRESS. 

5358 031650 012704 003200 MOV #3200,R4 SET FIU, FIV, 
5359 031654 170104 LDFPS 
5360 031656 012737 031676 001236 MOV #0013 a"STMP2 

5361 031664 012700 033300 MOV #DDP1 RO ;SET ACO OPERAND 
5362 031670 172410 LDD (RO) ,ACO 

5363 031672 012700 033310 MOV = #DDP2.,RO FSRC 

5364 031676 172010 DD13:  ADDD  — (RO) ,ACO ZTEST INSTRUCTION 
5365 031700 170205 STFPS RS GET FPS 

5366 031702 012700 033260 MOV #DDDATO,RO {CET THE RESULT 
5367 031706 174010 STD ACO, (RO) 

5368 031710 012701 033270 MOV #DDPO.R1 :1S IT CORRECT 
5369 031714 012702 000004 MOV #4 .R2 

5370 031720 022021 DD14: CMP (RO) +, (R1)+ 

5371 031722 001402 BEQ DD15 

5372 031724 000137 032642 JMP ADDERS FLOW FAILURE 216,440,121 
5373 031730 077205 DD15: SOB R2,DD14 

5374 031732 052704 000004 BIS #4 RG 

5375 031736 020405 CMP R4R5 EPS CORRECT? 
5376 031740 001402 BEQ DDi6 

5377 031742 000137 032472 JMP @ADDERO BAD FPS 

5378 ACO POC FSRC NEG /AC/ > /ESRC/ 

5379 031746 pp16: 

031746 104413 LPERR SET UP THE LOOP ON ERROR ADDRESS. 

5380 031750 012704 003200 MOV #3200,R4 SET FIV. FIV AND FD 
5381 031754 170104 LDFPS R& 

5382 031756 012737 031776 001236 MOV #DD17, a4STMP2 

5383 031764 012700 033320 MGV #DDP3.RO ;SET ACO OPERAND 
5384 031770 172410 LDD (RO) ACO 

5385 031772 012700 033350 MOV #DDP6,RO ESPC 

5386 031776 172010 DD17: ADDD _— (RO) ,ACO TEST. INSTRUCTION 
5387 032000 170205 STFPS RS GET FPS 

5388 032002 012700 033260 MOV #DDDATO,RO :GET THE RESULT 
5389 032006 174010 STD ACO, (ROS 

5390 032010 012701 033360 MOV #DDP7,R1 :1S IT CORRECT 
5391 032014 012702 000004 MOV #4 ,R2 

5392 032020 022021 DD18: CMP (RO) +, (R1)+ 

5393 032022 001415 BEQ DD21 

5394 032024 012700 033260 MOV #DDDATO,RO FLOWS FAILURE 
5395 032030 012701 033370 MOV #DDP8 Ri 216,440,101 

5396 032034 012702 000004 MOV #4 Re =GET GENERATED 
5397 032040 022021 DD19: CMP (RO) +, (R1)+ 

5398 032042 001402 BEQ . DD20 

5399 032044 000137 032700 JMP ADDERS DATA ERROR. 

5400 032050 077205 DD20: SOB R2,DD19 

5401 032052 000137 032736 JMP aADDERG 





mana 


C 


ee FPI11F FLTG PNT PRT A 


ADDD WITH NEGATVE OPRANDS 


5402 032056 
5403 032060 


5404 032062 

5405 032064 

5406 

5407 032070 
07 


5411 032 


W 
~ 


ELE FF 
Sano 
lelelelelelelea) 
KRKKKK 


54 2200 

5431 032202 

5432 032204 

5433 032206 

5434 

5435 032212 
2212 


5456 032314 


077205 


032472 


003200 


032120 
033350 


033320 


033260 
033360 
000004 


033260 
033370 
000004 
032774 
033032 


032472 


003200 


032242 
033330 


033340 


033260 
033370 
000004 


033260 
033360 
000004 


033070 


MACRO M1111 
TEST 


DD21: 


3;AC NEG 


DD2e: 


001236 


DD23: 


DD24: 


DD25: 


DD26: 
DD2?7: 


3;ACO 


DD30: 


001236 


POS 


L 10 
26-SEP=79 09:38 PAGE 19-3 


R2,DD18 
R4_RS 
DD22 


@4DDERO 
POS /FSRC/ > /AC/ 


——- R4 
70023. a4$TMP2 
RO 


#DDDATO,RO 
ACO, (RO) 
#DDP7,R1 

#4 ,R2 
oer 


DD2 
#DDDATO,RO 
#DDP8,R1 


#4 ,R2 
(RO) ,(R1) 
DD2 


on 
#DD31,a4$TMP2 
DP4-RO - 


R5 
#DDDATO,RO 
ACO, (RO) 
#DDP8,R1 

#4 ,R2 
(RO) +, (R1)+ 
DD35 
#ADDDATO,RO 
#DDP7,Ri1 
#4,R2 
(RO) +, (R1)+ 
DD34 
@ADDERD 
R2,DD33 


NEG 





sEPS CORRECT? 
;BAD FPS 


THE LOOP ON ERROR Sua 


;SET FIO,FIV, AND F 
SET ACO OPERAND 


F SPC 

ZTEST IN INSTRUCTION 
:GET THE RESULT 
71S iT CORRECT? 


3FLO,S FAILURE 
[CONSTANT (NOT 57) 
£216,042, 101 


;DATA ERROR. 


FPS CORRECT? 


;BAD FPS 
/AC/</FRSRC/ 
SET UP THE LOOP ON ERROR ADDRESS. 


SET FIO,FIV,AND FD 
SET ACO OPERAND 


F SPC 
ZTEST, = tame ie 
ZGET THE RESULT 
:1S IT CORRECT 
;ADD-SUB 
Ae FAILUR 
ON 216 None NOT 141 
FOR THE ALLIGNMENT 
;FLOWS? 
[DATA ERROR, D 


:GET ceneRAT TED 


SEQ 0128 





—m 


owe FPIIF FLTG PNT PRT A 


MACRO M1111 
TEST 


Mm 10 
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ADDD WITH NEGATVE OPRANDS SEQ 0129 
5457 032316 137. 033126 JME @ADDER10 
$458 032322 077220 DD35: SOB R2,DD32 
032324 052704 000010 BIS #10,R4 
$460 032330 020405 CMP 4,R5 ZFPS CORRECT? 
032332 001402 BEQ pp 36 
032334 000137 032472 JMP @4DDERO ;BAD FPS 
5463 ;ACO NEG FSRC POS /FSRC/</AC/ 
5464 032340 6: 
03234 104413 LPERR THE LOOP ON ERROR ADDRESS. 
5465 032342 012704 003200 V #3200,R4 :SET FIO, FIV, AND FD 
032346 170104 LDFPS oR 
5467 032350 012737 032370 001236 MOV #DD37, a4#$TMP2 
5468 032356 012700 033340 MOV #DDPS_RO zSET ACO OPERAND 
5469 032 172610 LDD (RO) ,ACO 
70 032 12700 033330 MOV #DDPS ,RO SPC 
5471 032370 172010 DD37: ADDD (RO) ,ACO ETEST let ci 
5472 032372 170205 STFPS RS GET 
5473 032374 012700 033260 MOV #DDDATO,RO GET THe RESULT 
4 0324 174010 STD ACO, (RO) 
$475 032402 012701 033370 MOV #DDP8,R1 :IS IT CORRECT 
5476 032406 012702 000004 MOV #4 R2 
$477 032412 022021 DD38: CMP (RO) +, (R1)+ 
5478 032414 001415 BEQ DD41 
5479 032416 012700 0335260 MOV A#DDDATO,RO ZADD SUB 
5480 032422 012701 033360 MOV #DDP7,R1 “FLOWS FAILURES 
$481 032426 012702 000004 MOV #4 ,R2 'GET 216,042,141 
5482 032432 022021 DD39: CMP (RO) +, (R1)+ oy THE ALL IGNMENT 
5483 032434 001402 BEQ 40 FLOWS? 
5484 032436 000137 033164 JMP @ADDER11 “DATA ERROR. D 
5485 032442 077205 DD4O: § R2,DD39 
0324 137 033222 MP a#DDER12 :BAD CONSTANT.D 
5487 032450 077220 DD41: SOB R2,DD38 
$488 032452 052704 000010 BIS #10,R4 
5489 032456 020405 CMP R4,RS :FPS CORRECT? 
032460 001402 BEQ pp42 
5491 032462 000137 032472 JMP a#DDERO :BAD FPS 
032 000137 033410 DD42:  JMP @4#DDDONE 
5493 032472 010437 001242 DDERO: MOV R4, a#STMP4 :FPS ERROR 
5494 032476 010537 001240 MOV RS. ah$TMP3 
5495 032502 104164 1$: ERROR +164 
5496 032504 000137 033410 JMP a#DDDONE 
5497 032510 DDER1: 
032510 012737 033300 001240 MOV ADDP1, a¥STMP3 
032516 012737 033300 001242 MOV #DDP1. a#$STMPS 
32 012737 033260 001244 MOV #DDDATO, a4 STMPS 
032532 012737 033400 001246 MOV #DDP9, a#STMPC 
032540 104165 1$: ERROR +165 
032542 000137 033410 - JMP a#DDDONE 
5498 032546 ' DDER2: 
032546 012737 033300 001240 MOV #DDP1, a#$TMP3 
032554 012737 033300 001242 MOV ADDP1. aASTMPS 
62 012737 033260 001244 MOV ADDDATO,a#$TMP5 § 
032570 012737 033400 001246 MOV #DDP9, AAS TMP 
032576 104176 1$: ERROR +176 
032600 000137 033410 JMP a#DDDONE 
5499 032604 DDER3: 
032604 012737 033300 001240 MOV #DDP1, a#$TMP3 
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134 ADDD WITH NEGATVE OPRANDS TEST 
032612 012737 033310 001242 MOV —- #DDP2, aw STMPG 
032620 012737 033260 001244 MOV —s#DDDATO, a#’STMPS 
032626 012737 033270 001246 MOV —- #DDPO, a#STMPG 
032634 104177 1$: ERROR +177 
3% 000137 033410 JMP ss @M#DDDONE 
5500 032642 DDERG: 
642 012737 033310 001240 MOV —- #DDP2, awSTMP3 
032650 012737 033300 001242 MOV —«s #DDP'1 . a#STMPG 
032656 012737 033260 001244 MOV —«s #DDDATO, a#$TMPS 
012737 033270 001246 MOV  #DDPO, a#S TMPG 
032672 104200 18: ERROR +200 
032674 000137 033410 JMP ss @A#DDDONE 
5501 032700 DDERS: 
032700 012737 033350 001240 MOV —- #DDP6, av STMP3 
0 012737 033320 001242 MOV - #DDP3, aw STMPG 
032714 012737 60 001244 MOV —«s #DDDATO, a# STMPS 
032722 012737 033360 001246 MOV —«- #DDP7 , a#STMPG 
730 104 1$: © ERROR + 
732 033410 JMP ss @M#DDDONE 
5502 032736 DDER6: 
032736 012737 033350 001240 MOV —s #DDP6, aw STMP3 
032744 012737 033320 001242 MGV —«- #DDP 3, a#STMPG 
032752 012737 033260 001244 MOV —s #DDDATO, a#STMPS 
032760 012737 033360 001246 MOV -—«s #DDP7 , a#STMPG 
66 104201 1$: ERROR +201 
770 033410 JMP ss @#*DDDONE 
5503 032774 DDER?: 
74 012737 033320 001240 MOV —«s #DDP3, a#STMP3 
012737 033350 001242 MOV - #DDP6, aw STMPG 
033010 012737 033260 001244 MOV «ADD DATO, a#$TMPS 
033016 012737 033360 001246 MOV —s #DDP7 aw STMPG 
033024 104165 1$: ERROR +165 
033026 000137 033410 JMP AMD DDONE 
5504 033032 DDERB: 
033032 012737 033320 001240 MOV —s #DDP3, a#STMP3 
033040 012737 033350 001242 MOV —- #DDP6. a#STMPG 
033046 012737 033260 001244 MOV —s #DDDATO, a#STMPS 
033054 012737 033360 001246 MOV #DDP7 , a#STMP6 
033062 104202 1$: ERROR +202 
03 000137 033410 JMP—— @MDDDONE 
5505 033070 DDERS: 
033070 012737 033340 001240 MOV —s #DDP5 , a#STMP3 
033076 012737 033330 001242 MOV —- #DDP4 a#STMPG 
04 012737 033260 001244 MOV - #DDDATO, a#STMPS 
033112 012737 033370 001246 MOV —- #DDP8 a#STMP6 
033120 104165 1$: ERROR +165 
033122 000137 033410 JMP ss @M#DDDONE 
5506 033126 DDER10: 
033126 012737 033340 001240 MOV —s #DDPS aw STMP3 
3134 012737 033330 001242 MOV - #DDP4 a#STMPG 
033142 012737 033260 001244 MOV —« #DDDATO, a $TMPS 
033150 012737 033370 001246 MOV  —- #DDP8, a#$TMPG 
033156 104203 1$: ERROR +203 
033160 000137 033410 JMP ss AMDDDONE 
5507 033164 DDER11: 
033164 012737 033330 001240 MOV —- #DDP4 ,awSTMP3 
033172 012737 033340 001242 MOV —- ADDPS Saw STMPG 


SE@ 0130 


— FPIIF FLTG PNT PRT A 


033200 
033206 
033214 
03 

5508 033222 
03 


012737 
012737 


033260 
033370 


033410 
033330 
3340 
033260 
033370 


033410 


oO 
WwW 


MACRO M1111 
ADDD WITH NEGATVE OPRANDS TEST 


1$: 


DDERI2: 


1$: 


DDDATO: 


DDPO: 


DDP1: 


DDP2: 


DDP3: 


DDP4: 


DDPS: 


DDP6: 


DDP?: 


DDPS: 


DDP9Y: 


DDDONE : 


SL EAAAAAARAAAARARARERAEAAAARAAAHARARARARARAAARARARAAAAAAARARAARHROREHE 


00200 


ooo -OCO aa tie” pee niet ied” wes ‘wie, ‘ei 
oO 
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MODDATO, a#STMPS 


#DDPB, aa TMP6 
+165 

@4DDDONE 

MDDPS ,aASTMP3 

MDDPS , a#STMPS 

#DDDATO, aS TMPS 

#DDPS , aS TMP6 

+204 

@4DDDONE 

RESET 


;-DDP2 

7-DDP1 

ZEXP=4 
sFRAC=...110... 
sEXP=3 
;FRAC=...100... 
7; ~DDP3 

7 ~DDP4 
;DDP3+DDP6 
:DDP5+DDP4 
:DDP1+DDP1 


SEQ 0131 






SUBD 


033412 
5563 033414 
3414 


5567 033432 
5568 033436 
5569 033440 


5591 

5592 Oreos 
5593 033544 
594 5 


5608 033624 





012701 


CKFPAAQ FPI1IF FLTG PNT PRT A 
135 TEST 


003200 


033444 
034124 


034124 
034102 
034112 
000004 


034102 
034134 
000004 


033712 
933750 
000004 


033674 


003200 


032572 
034144 


034144 


034102 


034112 
000004 


MACRO M1111 26=SEP=79 09:38 PAGE 19-/ 
sTEST 35 SUBD TEST 
ce THIS IS A TEST OF THE SUBD INSTRUCTION. 
+* BOTH A POSITIVE AND A NEGATIVE NUMBER 
‘* I$ SUBTRACTED FROM IT SELF 
**® 
*; RAEAARAARARARAARAARAARARARAARARARAARARARAREARERARRERARARAAAHREEKRAEHREKHRAREEAE 
1$135: SCOPE 
a USE POSITIVE OPERANDS 
LPERR :SET UP THE LOOP ON ERROR ADDRESS. 
V #3200,R4 :SET FIO, FIV, AND FD 
LDFPS RG 
001236 MOV #EE2, aS TMP 
MOV #EEPI RO zSET ACO OPERAND 
LDD (RO) ,ACO 
MOV #EEP1 RO :F SPC 
EE2: UBD _—- (RO) ,ACO ‘TEST INSTRUCTION 
STFPS RS [GET FPS 
MOV #EEDATO,RO GET THe RESULT 
STD ACO, (RO) 
MOV WEEPO,R1 :1S IT CORRECT? 
MOV #4 R2 
re3: CMP (RO) +, (R1)+ 
BEQ EE6 
MOV WEEDATO,RO :DID A BAD 
MOV MEEP2,R1 “CONSTANT (NOT 57) 
MOV #4 ,R2 [GET GENERATED 
CEG: CMP (RO) +, (R1)+ [FOR THE ALLIGNMENT 
BEO EES FLOWS? 
JMP a#EEERI [DATA ERROR.D 
EES: SOB R2,EE4 
IMP avEEERZ ;BAD CONSTANT.D 
EE6: SOB R2,EE3 
BIS #4~R 
CMP R4_RS :FPS CORRECT? 
BEQ EE? 
JMP aYEEERO :BAD FPS 
cia 7USE NEGATIVE OPERANDS 
LPERR :SET UP THE LOOP ON ERROR ADDRESS. 
MOV #3200, R4 :SET FIO, FIV, AND FD 
LDFPS 
001236 MOV SEES arsTMP2 
MOV HEEPS,RO :SET ACO OPERAND 
LDD (RO) ACO 
MOV #EEPS_RO SPC 
EE8: SUBD — (RO) ,ACO Test INSTRUCTION 
STFPS RS “GET FPS 
MOV #EEDATO,RO GET THe RESULT 
STD ACO, (RO) 
MOV #EEPO,R1 :1S IT CORRECT? 
MOV #4 R2 
EE9: CMP (RO) +, (R1)+ 
BEQ 1 





¢ 11 


EE12 
MOV #EEDATO,RO 
MOV MEEPS RI 


BAD 
STANT (NOT 57) 


SEQ 0132 


0 
5626 Seen 


5627 0 
0 


5641 034132 





CKFPAAQ FP11F FLTG PNT 
735 SUBD TEST 


012792 


00000 
000000 


PRT A 


034164 


D 11 
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001240 


001246 


MOV #4 ,R2 
FE10: CMP (RO)+,(R1)+ 
BEQ EE11 
JMP aFEEER3 
FE11: $08 R2,£E10 
MP aFEEERS 
FE12: SOB R2,EE9 


EE13 
EEERO 


1$ 
EEER1 


1$ 
EEERZ 


1$ 
FEER3 


1% 
EEERS 


1$: 
EEDATO: 


EEPO: 
00000 


EEP1: 


MEEP1 ,a#STMP3 
MEEP1 ,@#STMP4 
MEEDATO, aA STMPS 
#EEPO, @4STMP6 

. 


@4#EEDONE 


#EEP1 ,a#STMP3 
MEEP1 ,@ASTMPS 
#EEDATO, aA#STMPS 
MEEPO ,a#STMP6 


+ 


@4#EEDONE 


MEEPS ,@ASTMPS 
MEEPS, a#STMPS 
#EEDATO, aS TMPS 
HEEPO, a4$STMP6 

* 


@4EEDONE 

MEEPS ,@#STMP3 
MEEPS, Q#STMPS 
MEEDATO, aA#STMPS 
#EEPO, a#STMP 


+ 
@4EEDONE 


GET GENERATED 


;FOR THE ALL IGNMENT 


7 FLOWS? 

DATA ERROR .D 
;BAD CONSTANT .D 
FPS CORRECT? 


;BAD FPS. 
BAD FPS 


: 4~R4 
E13: 
' 5. ans 
: 205 
MP 
: 206 
; 207 
MO PO 
: 206 
MOV PO, a4STMP6 
: 207 
JMP 


SEQ 0133 


| 


a) 


CKFPAAO FP11F reat’ PNT PRT A 


SUBD T 
5642 034134 


5664 


568 
5690 034266 


000400 


003200 


034220 
034512 


034522 
034462 


034532 
000004 


003200 


MACRO M1111 
FEP2: 400 
0 
0 
0 
EEP3: — 
0 
0 
EEP4: ate 
0 
FEDONE : 
RSE TUP 


001236 


E 11 
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3GO_ INITIALIZE THE FPS AND STACK; AND 
;SEE IF THE USER HAS EXPRESSED 

THE DESIRE TO CHANGE THE SOF TWARE 
;VIRTUAL CONSOLE SWITCH REGISTER (HAS 
;THE USER TYPED CONTROL G?). 


ROE RARER ARERR REERERARERERRRAERRRAERERERAREREERHEEREERKED 


S*TEST 36 


NORMALIZE ALGORITHM TEST 


3* THIS IS A TEST OF THE NORMALIZE 

3* FLOW ALGORITHM. TWO PATTERNS ARE USED, 
3* FIRST THE MINIMUM SITUATION REQUIRING ONE 
7* LEFT SHIFT AND THEN THE MAXIMUM SITUATION 
3* REQUIRING 56 SHIFTS. 


SAAR AAAAARAARRARAERRARRRARERAARARERRRAERARARAERAERARAHRAEARARRHRARE 


TST36: 


: SCOPE 
Ea as DATA PATTERNS THAT REQUIRE ONLY ONE LEFT SHIFT TO NORMALIZE 


LPERR 


FF: ADDD 


FFG: SOB 


SET UP THE LOOP ON ERROR + hae 


#3200,.R4 :SET FIO, FIV, AND F 
#FF 2, a#STMP2 
#FFP2,RO :SET ACO OPERAND 
(RO) ACO 
#FFP3,RO 
(RO) ,ACO Test INSTRUCT ION 
R5 [GET FPS 
#F FDATO,RO GET Te RESULT 
ACO, (RO) 
#FFP4, RI r1S IT CORRECT 
#4 R2 
(RO) +, (R1)+ 
FFG 
FFER2 :BAD DATA 
R2,FF3 
R4_RS ZFPS CORRECT? 
FS 
FE 


BR FFERO :BAD FPS 
;USE DATA PATTERNS WHICH REQUIRE 56 LEFT SHIFTS TO NORMALIZE 


; THE RESULT 
FFS: 


LPERR 
MOV 
LDFPS 


7 SET ail THE LOOP ON ERROR agent SS. 
+ ada SET FIU, FIV, AND FD 


SEQ 0134 


FEA AL en LE RE PLR CM MS PR 


wo 1 


Nia FPIIF FLTG PNT PRT A 
T 


NORMALIZE ALGORITHM TEST 


5691 034270 


5708 034350 
5709 


5710 034352 
5711 034356 


9 
5726 034462 
5721 034464 
5722 034466 
5723 034470 
5724 


5725 034472 


012737 


034310 
034472 


034502 


034462 
034532 
000004 


001240 
001242 


034502 


034522 
034512 
034462 
034532 


034542 


MACRO M1117 


001236 


001240 


001246 


001240 
001242 
001244 
001246 


FFG: 


tF7: 


FFIO: 


FFV1: 


FFERO: 
TR: 


FFERT: 


1$: 


FFER2: 


1$: 


FFDATO: 


F 17 
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MFFS «* hte 


BAD FPS 


R5 ,a#$TMP3 
R4 ,aASTMPS 
+164 

F F DONE 


MFFP1 ,@ASTMP3 
M#FFPO,QASTMPS 
#FEDATO, @A#STMPS 
AFFPS ,@ASTMP6 
+210 

aAF F DONE 


#FFP3,Q4$TMP3 
MF FP2, Q4STMPS 
#FFDATO, a@A#STMPS 
MFFPSG ,aASTMPE 
+210 

aAF F DONE 


;SET ACO OPERAND 
ZF SRC 

s TEST INSTRUCTION 
;GET FPS 

;GET THE RESULT 
;1S 17 CORRECT 


;BATA 
sFPS CORRECT? 


SEQ 0135 


CKFPAAQ FP1IF 4 PNT PRT A 


136 NORMAL 


016746 
194403 
006 


000 
104401 
000421 


016746 
104403 
006 


ZE ALGORITHM TES 


144332 
144526 
144544 
160000 


034610 


144472 


034644 


144200 


001313 
144164 
000042 


sco mii 


144536 


26-SEP=79 09: 38 


.SBTTL END OF PASS ROUTINE 
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i 
SEQ 0136 


WEARER RRR REPRE RRR ERR RRR RRR RRR RRR RR RRR RRR RRR RRR RRR RRR RRR RRR SD BS 


[* INCREMENT THE PASS NUMBER ($PASS) 


:* INDICATE END-OF-PROGRAM AFTER 1 PASSES THRU THE PROGRAM 


i*1F SW12=1 INHIBIT TRACE TRAP 
>*IF THERES A MONITOR GO TO IT 


SF FPG=FFPO+FFP1 

: =FFP3+F FRG 

| 

! 

$3 ZERO THE TEST NUMBER 
:ZERO THE NUMBER OF ITERATIONS 
‘INCREMENT THE PASS NUMBER 

:300N"1 ALLOW A NEG. NUMBER 


szVes 
2sRESTORE COUNTER 


2a TYPE ASCIZ STRING 
3GET OVER THE ASCIZ 


eh SPASS FOR TYPEOUT 
TYPE PASS NUMBER IN OCTAL 
7GO_TYPE--OCTAL ASCII 

‘TYPE 6 DIGITS 

: ¢ SUPPRESS LEADING ZEROS 


SINCE LAST REPORT / 


7;SAVE SERTTL FOR TYPEOUT 

3: TOTAL NUMBER OF ERRORS IN OCTAI 

::GO TYPE~-OCTAL ASCII 

:; TYPE 6 DIGITS 

3 SUPPRESS LEADING ZEROS 

os OE CARRIAGE _ 
CLEAR ERROR TOTA 


LINE FEED 


s*IF THERE ISN'T JUMP TO LOOP 
$EOP: 

SCOPE 

CLR $STSTNM 

CLR het 

INC $PAS 

BIC #100000, $PASS 

DEC on 
SEOPCT: . WORD 

BGT sone 

MOV (PC) +,a(PC)+ 
SENDCT: .WORD 1 

$EOPCT 

TYPE ro ey 

BR 
OO ig -ASCIZ _:, PASS #/ 

MOV $PASS,-(SP) 

TYPOS 

BYTE $ 

-BYTE O 

TYPE ,67$ 

6R 6 
Sad eASCIZ / TOTAL ERRORS 

MOV SERTTL,-(SP) 

TYPOS 

BYTE 6 

BYTE 

TYPE , SCRLF 

CLR SERTTL . 
$GET42: MOV @F42,R0 


GET MONI TOR ADDRESS 


H 11 
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CKFPAAO FP11F FLTG PNT PRT A MACRO M1111 | 
END OF PASS ROUTINE SEQ 0137 EI 
034732 001414 BEQ SDOAGN ; ;BRANCH IF NO MONITOR 
034734 005046 CLR =(SP) S INSURE THE ‘'T’’ BIT is CLEAR 
034736 012746 034744 MOV #$CLR.T,<(SP) SETUP FOR AN RTI ORR 
034742 26 BR $RTRN DO AN ATI OR RTT "0 OAD THE PSW 
tiWITH A CLEARED ‘T°’ BIT 
034744 $CLR.T: 
034744 013700 000042 MOV a742,R0 zz INSURE RO CONTAINS THE MONITORS 
034750 001405 BEQ $DOAGN :S RETURN ADDRESS 
034752 5 RESET *=CLEAR THE WORLD 
034754 004710 SENDAD: JSR PC, (RO) ::GO TO MONITOR 
034756 000240 NOP >: SAVE ROOM 
034760 000240 7 FOR 
034762 000240 p SZACT11 
034764 $DOAGN: 
034744 104400 TRAP ; ;PUSH OLD PS AND PC ON STACK 
034766 042716 000020 BIC #20, (SP) “CLEAR THE ‘'T’’ 
034772 032777 010000 144140 BIT #B1T12,aSwR 3 TRUN WITH TRACE the? 
035000 00100 BNE 1$ [BR IF NO 
035002 005167 000020 COM $IBIT i218 IT TIME FOR TRACE TRAP 
35006 10040 BMI 1$ [BR IF NO 
035010 052716 000020 BIS #20, (SP) +:SET TRACE TRAP 
035014 012746 035022 1$: V #$LOOP, -(SP) * JUMP TO START OF TEST 
035020 $RTRN: RT! 7 :RETURN==THIS IS CHANGED TO 
AN RIT’ IF ‘RTT’ IS A LEGAL 
<EONSTRUCTION 
035022 $LOOP: 
035022 000137 JMP a(PC)+ RETURN 
035024 004270 $RTNAD: .WORD LOOP 
035026 000000 $™BIT: .WORD 0 ii''T'' BIT STATE INDICATOR 
635030 Sv7 377 000 $ENULL: Pak -1,-1,0 ~ZNULL CHARACTER STRING 
EV 
5754 
5755 .SBTTL SCOPE HANDLER ROUTINE 
CLEARER REE ERREAEREREREAEEERRAEERERERERREERREAEERRREA HEE 
:*THIS ROUTINE CONTROLS THE LOOPING OF SUBTESTS. IT WILL INCREMENT 
**AND LOAD THE TEST NUMBER(STSTNM) INTO THE DISPLAY REG. (DISPLAY<7:0>) 
**AND LOAD THE ERROR FLAG ($ERFLG) INTO DISPLAY<15:08> 
> *THE SWITCH OPTIONS PROVIDED BY THIS ROUTINE ARE: 
*SW14=1 LOOP ON TEST 
: #SW11= INHIBIT ITERATIONS 
«SWO9=1 LOOP ON ERROR 
* SWO8= LOGP ON TEST IN SWR<7:0> 
* CALL 
SCOPE ::SCOPE=10T 
035034 $SCOPE 
035034 104406 CKSWR zi TEST FOR CHANGE IN SOFT-SwR 
035036 032777 060000 144074 1$: BIT #BIT14,aSWR ;:LOOP ON PRESENT TEST? 
035044 001114 BNE SOVER “YES IF SW14=1 
;MMAAASTART OF CODE FOR THE XOR Testenseese 
035046 000416 $xTSTR: BR 6$ s IF RUNNING ON THE OR’ TESTER CHANGE 
‘THIS INSTRUCTION TO A ‘NOP’' (NOP=240) 
035050 013746 900004 MOV Q#ERRVEC,-(SP) ::SAVE THE CONTENTS ¢ THE ERROM VECTOR 
035054 012737 035074 000004 MOV #5$, aAERRVEC ::SET FOR TIMEOUT 
035062 005737 177060 TST a4#177060 ME OUT XOR? 
35066 012637 000004 MOV (SP) +, AERRVEC RESTORE THE ERROR VECTOR 
035072 000463 BR $SVLAD *:GG TO THE NEXT TEST 
035074 022626 5$: CMP (SP) +, (SP) + 7: CLEAR THE STACK AFTER A TIME OUT 









CKFPAAQ FPITF FLTG PNT PRT A 
SCOPE HANDLER ROUTINE 


012637 000004 
000423 

ON Ls 000400 
127767 144020 
001465 

105767 143755 
126767 143757 


HM 001000 
016767 143732 


MACRO M1111 





144026 
143760 
e$: 
143743 
143770 
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MOV 


BR 
6%: ;A#A#AEND OF 
B 


























SEQ 0138 


(SP) +, @#ERRVEC + ¢RESTORE THE ERROR VECTOR 

7$ LOOP ON THE PRESENT TEST 

CODE FOR THE XOR™ TESTERSANER 

#B1T08,aSWR + ¢LOOP ON SPEC. TEST? 
;3BR IF NO 


2$ I 

@SWR ,$TSTNM 7ON THE RIGHT TEST? SWR<7:0> 
$OVER SBR IF YES 

SERFLG 77HAS AN ERROR OCCURRED? 

3$ ;;BR IF NO 


SERMAX ,SERFLG zEMAK ERRORS FOR THIS TEST OCCURRED? 


F NO 
#B1TO09,aSWR + ¢LOOP ON ERROR? 
4$ ;BR_IF NO 


035152 143726 7%: MOV $LPERR,SLPADR ::SET LOOP ADDRESS TO LAST SCOPE 
35160 000446 BR $OVER 
035162 105067 143715 4$: CLRB SERFLG ea THE ERROR FLAG 
035166 005067 144110 CLR $TIMES 3;CLEAR THE NUMBER OF |S gaaeana TO MAKE 
035172 000415 BR 1$ sESCAPE TO THE NEXT TES 
035174 032777 004V00 143736 3%: BIT #BIT11,aSWR ; INHIBIT ITERATIONS? 
C35202 001011 BNE 1$ ‘TBR IF YES 
035204 005767 144114 TST $PASS i IF FIRST PASS OF PROGRAM 
035210 001406 BEQ 1$ INHIBIT ITERATIONS 
035212 005267 143666 INC $ICNT “INCREMENT ITERATION COUNT 
025216 026767 144060 143660 CMP STIMES,$SICNT : ¢ CHECK THE NUMBER OF ITERATIONS MADE 
035224 002024 BGE $OVER ;;BR_ IF MORE ITERATION REQUIRED 
035226 012767 1 143650 18: MOV #1 ,$1CNT tt meen THE ITERATION COUNTER 
35234 016767 144040 MOV SMXCNT ,STIMES ;SET NUMBER OF ITERATIONS TO DO 
035¢e42 105267 143634 $SVLAD: INCB STSTNM [COUNT TEST NUMBERS 
035246 116767 143630 144046 MOVB STSTNM,STESTN :SET TEST NUMBER IN APT MAILBOX 
035254 011667 143626 MOV (SP) , SLPADR ‘ USAVE SCOPE LOOP ADDRESS 
35260 011667 143624 MOV (SP) ,SLPERR 3;:SAVE ERROR LOOP ADDRESS 
035264 5067 144014 CLR $ESCAPE 7;CLEAR THE ESCAPE FROM ERROR ADDRESS 
035270 112767 000001 143617 MOVB #1 , SERMAX 7ZO0NLY ALLOW ONE(1) ERROR ON NEXT TEST 
035276 016777 143600 143636 $OVER: MOV $TSTNM, aDISPLAY acer o TEST NUMBER 
0353046 016716 143576 MOV $LPADR, (SP) ;FUDGE RETURN ADDRESS 
035310 000002 RTI sFIXES PS 
5756 035312 000001 SMXCNT: 1 “ IMAX. NUMBER OF ITERATIONS 
5757 -SBTTL ERROR HANDLER ROUTINE 
CLARA EAE AREER ERE AREER AERA KEEREAER ERED 
7*THIS ROUTINE WILL INCREMENT THE ERROR FLAG AND THE ERROR COUNT, 
;*SAVE THE ERROR ITEM NUMBER AND THE ADDRESS OF THE ERROR CALL 
;*AND GO TO ERTYPE ON ERROR 
> * THE ihe sald PROVIDED BY THIS ROUTINE ARE: 
*SW15=1 T ON ERROR 
> *SW13=1 TNAIBIT ERROR TYPEOUTS 
3*Sw10=1 BELL ON ERROR 
—_— LOOP ON ERROR 
2 *CALL 
_~ ERROR N ;ERROR=EMT AND N=ERROR ITEM NUMBER 
035314 $SERROR: . 
035214 104406 CKSWR ee TEST FOR CHANGE IN SOFT=SWR 
035316 105267 143561 7$: INCB SERFLG SET THE ERROR FLAG 
035322 001775 BEQ 7$ $3 ON*T LET THE FLAG GO TO ZERC 
03 143552 143610 MOV ah = 7;DISPLAY TEST NUMBER AND ERROR FLAG 
03 43600 BIT ry 10,a [BELL ON ERROR? 
03 BEQ 1$ INO ~ SKIP 
44 ian 





CKFPAAQ FP11F FLTG PNT PRT A 


ERROR HANDLER ROUTINE 


122767 
035420 001007 
116767 
004767 


02 
016716 
022737 
001001 


032777 


5758 
5759 


001306 
143540 
143540 
000002 
143526 
020000 
002174 
001313 
000001 


143466 
001010 


143474 


001000 


143422 
143612 


143604 
034754 


001000 
001162 
177776 
000377 


000002 


MACRO M1111 


143716 
000004 


143460 


000042 


143420 


001162 
143420 


1$: INC 


20$: 


cis: 


2e$: BR 
es: TST 


3$: BIT 
4$: TST 


5$: 


6$: 


ERM10: 


J.11 
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, SBELL 
SERTTL 
(SP) , SERRPC 
#2, SERRPC 


@SERRPC Si TEMB 


#B1T13,aSWR 
20 

PC ,ERTYPE 

, $CRLF 


oo 


SITEMB,21$ 
—" 


0 

22$ 

@SwR 

3$ 

* tans 
SLPERR, (SP) 
$SESCAPE 

5$ 
SESCAPE , (SP) 
ASENDAD , 0442 
6$ 


#51T09,aSWR 
ERM10 


). aF$REGO 
#-2, a#SREGO 
#377, a$REGO 
ERM10 

#2, (SP) 


+ ¢RING BELL 
COUNT THE NUMBER OF ERRORS 
7:GET ADDRESS OF ERROR INSTRUCTION 


ty! AND SAVE THE ERROR ITEM CODE 
:SKIP TYPEOUT IF SET 
;SKIP_ TYPEOUTS 

:2¢0 TO USER ERROR ROUTINE 


7 zRUNNING IN APT MODE 

7zNO,SKIP APT ERROR REPORT 

:7SET ITEM NUMBER AS ERROR NUMBER 
7 REPORT FATAL ERROR TO APT 


; APT ERROR LOOP 

7 7HALT ON ERROR 

ii SKIP IF CONTINUE 

;ZHALT ON ERROR! 

72 TEST FOR CHANGE IN SOFT=-SwWR 
;zLOOP ON ERROR SWITCH SET? 


;7BR IF NO 

: FUDGE RETURN FOR LOOPING 

3: CHECK FOR AN ESCAPE ADDRESS 
;3BR IF NONE 

;2FUDGE RETURN ADDRESS FOR ESCAPE 


7zACT-11 AUTO-ACCEPT? 
a IF NO 


SEE IF ERROR #377 


-SBTTL SAVE AND RESTORE RO-R5 ROUTINES 


CL AAA RAAERAEERA EERE ARERERKEEHEAAREREKRRARAEARARAEARERAERERRARAEE HER 


3 *SAVE RO-R5 
2 *CALL: 


SAVREG 
: UPON RETURN FROM $SAVREG THE STACK WILL LOOK LIKE: 


 eTOP==~(+16) 
pt +2---(+18) 
De +4---R5 
2% +6---RS 
s* +8---R35 
3*+10---R2 
p*+12---R1 
+ *+14---R0 
$SAVREG: 








CKFPAAQ FP11F FLTG PA PRT A 


SAVE AND RESTORE RO=K»5 OUT INES 


035552 010046 


5760 
5761 


035646 105767 
0000 


035726 001003 


143305 


000002 
000001 


000100 


000004 
000516 


000040 


K 11 
MACRO M1111 26=SEP=79 09:38 PAGE 19-15 


143442 
143433 


143411 


MOV RO,-(SP) ;zPUSH RO ON STACK 
MOV R1,~(SP) 7ZPUSH R1 ON STACK 
MOV R2,-(SP) 7 ;PUSH R2 ON STACK 
MOV R3,-(SP) 7 PUSH R3 ON STACK 
MOV aa’ -(SP) 7 7PUSH R4 ON STACK 
MOV -(SP) 77PUSH RS ON STACK 


MOV B3tsp) -(SP) 73SAVE PS OF MAIN FLOW 
MOV 22 (SP) ,=(SP) sSAVE PC OF MAIN FLOW 
MOV 22(SP) .=(SP) 7eSAVE PS OF CALL 
MOV 22(SP) ,=(SP) 3eSAVE PC OF CALL 


RTI 
> *RESTORE RO-R5 
3*CALL: 


=® RESREG 
SRESREG: 
MOV (SP) +,22(SP) ZZRESTORE PC OF CALL 
MOV (SP)+,22(SP) ZZRESTORE PS OF CALL 
MOV (SP)+,22(SP) ;zRESTORE PC OF MAIN FLOW 
MOV (SP)+,22(SP) nt 3 PS OF MAIN FLOW 
MOV (SP)+,R5 ::POP STACK INTO R5 
MOV (SP)+,R4 :zPUP STACK INTO R4& 
MOV (SP) +,R3 7zPOP STACK INTO R3 
MOV (SP)+,R2 ;zPOP STACK INTO R2 
MOV (SP) +,R1 + STACK INTO R1 
MOV (SP)+,RO ;POP STACK INTO RO 


-SBTTL TYPE ROUTINE 


Went Pee RRR EERERRRASSESESARAASAERSASARASAASEAR ARR ARERR RAR SARA RASS SS 


;*ROUTINE TO TYPE ASCIZ MESSAGE. MESSAGE MUST TERMINATE WITH A O BYTE. 


3 *THE ROUT INE WILL INSERT A NUMBER OF NULL CHARACTERS AFTER A LINE FEED 
; *NOTE1 $NULL CONTAINS THE CHARACTER TO BE USED AS THE FILLER CHARACTER. 
> *NOTE2: $FILLS CONTAINS THE NUMBER OF FILLER CHARACTERS REQUIRED. 
; *NOTE 5: SFILLC CONTAINS THE CHARACTER TO FILL AFTER. 
; “CALL 
i417) USING A TRAP INSTRUCTION 
—_ TYPE -ME SADR 3sMESADR IS FIRST ADDRESS OF AN ASCIZ STRING 
ot 
ie TYPE 
° ME SADR 
$TYPE: TSTB STPFLG iI THERE A TERMINAL? 
BPL 1$ :BR IF YES 
HALT :sHALT HERE IF NO TERMINAL 
BR 3$ 7 LEAVE 
1$: MOV RO,-(SP) 7:SAVE RO 
MOV @2(SP) ,RO 3:GET ADDRESS ps ASCIZ STRING 
CMPB MAPTENV, SENY ; ¢ RUNNING IN APT MODE 
BNE 6 3NO,GO CHECK FOR APT CONSOLE 
BITB M#APTSPOOL , SENVM ; SPOOL MESSAGE TO APT 
BEQ 62$ 3NO,GO CHECK FOR CONSOLE “ 
MOV RO,61$ :? SETUP MESSAGE ADDRESS FOR APT 
JSR PC ,SATY3 :SPOOL MESSAGE TO APT 
WOR : :MESSAGE ADDRESS 


61$: . WORD 
62$: BITB #APTCSUP,$SENVM ; ¢APT CONSOLE SUPPRESSED 
BNE 60$ :YES,SKIP TYPE OU7 


SEQ 0140 


wo 


CKFPAAQ FPTIF FLTG PNT 
TYPE ROUTINE 


5762 


PRT A 


000002 
000011 
000200 


000200 


000056 
143150 
143140 
000001 


000032 
000142 


000002 
143044 
143040 
177600 
000023 
143020 


143014 


MACRO M1111 


000122 


143056 


000002 


000002 


$TYPEC: 


2$: MOVB 
60$: MOV 
3$: ADD 
4$: CMPB 


BR 
5$: JSR 
6$: CMPB 


7$: DECB 


BR 
;HORIZONTAL TAB 
8$: MOVB 


9$: JSR 


BN 
3$: TSTB 


1$: CMPB 


INCB 
SCHARCNT : . WORD 


$TYPEX: RTS 


L 1 
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1 - 
SEQ 0141 

;zPUSH CHARACTER TO BE TYPED ONTO STACK 
;7BR IF IT ISN'T THE TERMINATOR 
321F TERMINATOR PGP IT OFF THE STACK 
; RESTORE RO 
szADJUST RETURN PC 
7 RETURN 
7 BRANCH IF <HT> 
; ;BRANCH IF NOT <CRLF> 
:zPOP <CR><LF> EQUIV 
37 TYPE A CR AND LF 
7zCLEAR CHARACTER COUNT 
77GET NEXT CHARACTER 
+ £G0 TYPE THIS CHARACTER 

:1S IT TIME FOR ae CHARS. ? 
tiIF NO GO GET NEXT CHAR. 
2 2GET # OF FILLER CHARS. NEEDED 

sAND THE NULL CHAR. 


(RO) +,=-(SP) 
4$ 

(SP) + 

(SP) +,RO 
#2, (SP) 
HT, (SP) 
CRLF, (SP) 
5$ 


(SP) + 


SCHARCNT 
2$ 


PC,$TYPEC 
$FILLC, (SP)+ 
2$ 


$SNULL ,- (SP) 
1(SP) 
$ 


6 
PC, STYPEC 
—— 


7 
PROCESSOR 
a’ ,(SP) 
PC, $TYPEC 
#7, $CHARCNT 
9$ 


(SP) + 
2 


$ 

a$TPs 
STYPEC 
2(SP) ,a$TPB 
a$TKS 


2s 
a$TKB,-(SP) 
#177600, (SP) 
i (SP) + 


2 
a$TKS 
3$ 


a$TKB,-(SP) 
#177600, (SP) 
#21, (SP)+ 
#CR,2(SP) 

1$ 


LF ,2(SP) 
$TYPEX 
(PC)+ 

0 

PC 


; DOES A NULL NEED TO BE TYPED? 
;:BR IF NO--GO POP THE NULL OFF OF STACK 
:GO TYPE A NULL 

:D0 NOT COUNT AS A COUNT 


;zREPLACE TAB WITH SPACE 
7s TYPE A SPACE 
ree IF NOT AT 

: TAB STOP 


7:POP SPACE OFF STACK 
3:GET NEXT CHARACTER 
;zWAIT UNTIL PRINTER IS READY 


; LOAD CHAR TO BE hg INTO DATA REG. 
73 SEE IF KEYBOARD 3° ALKING. 
;BRANCH IF IT ISN'T 
+: PUSH CHARACTER ONTO STACK 
;:BIT CLEAR TOP wt AND PARITY BIT. 
; SEE IF THIS IS A “*S. 
: TO CONTINUE IF IT ISN'T. 
HER INPUT. aH 


NE ST 
iI CLEAR TOP BYTE AND PARITY BIT. 
;SEE IF THIS is A “Q. 
; BRANCH BACK FOR MORE WAIT IF NOT. 
33$ ae ie A CARRIAGE RETURN? 


: :BRAN IF 
:YES--CLEAR CHARACTER COUNT 


SEXIT 

HIS CHARACTER A LINE FEED? 
BRANCH IF YES 

: = COUNT THE CHARACTER 
CHARACTER COUNT STORAGE 


as oe 


CKFPAAQ FPTIF FLTG PNT 
BINARY TO OCTAL (ASCII 


5763 





052703 


PRT A 
YPE 


) AND T 


000076 
177770 


M11 
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000211 


000154 


SEQ 0142 
.SBTTL BINARY TO OCTAL (ASCII) AND TYPE 


WOTTITIT ILI IIILITIIILiTt tt iiitttiiiiiti iii iii iii iii iii iii) 
*THIS ROUTINE IS USED TO = A 16-BIT BINARY NUMBER TO A 6-DIGIT 
*OCTAL (ASCII) NUMBER AND TYPE IT 

Ne tae a HERE TO SETUP SUPPRESS ZEROS AND NUMBER OF DIGITS TO TYPE 


NUM ,-(SP) ; NUMBER TO BE TYPED 
Z7CALL FOR TYPEOUT 
;zN=1 TO 6 FOR NUMBER OF DIGITS TO TYPE 
:7M=1 OR O 
321=TYPE LEADING ZEROS 
;0=SUPPRESS LEADING ZEROS 


> *$TYPON=---ENTER HERE TO TYPE OUT WITH THE SAME PARAMETERS AS THE LAST 
;*$TYPOS OR $TYPOC 
s*CALL: 
;* MOV NUM, = (SP) ; NUMBER TO BE TYPED 
s* 3iCALL FOR TYPEOUT 
“* 
OS Sp ip atic HERE FOR TYPEOUT OF A 16 BIT NUMBER 
;*CALL: 
;* MOV NUM ,-(SP) 7 NUMBER TO BE TYPED 
3* T :zCALL FOR TYPEOUT 
$TYPOS: @(SP) ,-(SP) 7zPICKUP THE MODE 
MO 1(SP) ,SOF ILL ;7LOAD ZERO FILL SWITCH 
(SP)+,$OMODE+1 ;;NUMBER OF DIGITS TO TYPE 
(SP) ; ADJUST RETURN ADDRESS 


3:SET THE ZERO FILL SWITCH 
::SET FOR SIX(6) DIGITS 
72SET THE ITERATION COUNT 
>; SAVE R3 


E RS 
SIGET THE NUMBER OF DIGITS TO TYPE 


;;SUBTRACT IT FOR MAX. ALLOWED 
7zSAVE_IT FOR USE 
ath THE ZERO FILL SWITCH 
PICKUP THE INPUT NUMBER 
22 CLEAR THE OUTPUT WORD 
ROTATE MSB INTO *'C"’ 
DO MSB 


<FORM THIS DIGIT 


7:GET LSB OF THIS DIGIT 
tg a DIGIT? 


ZGET RID OF JUNK 
SITEST FOR 0 
:BR TP ves 0? 


;DON'T SUPPRESS ANYMORE 0°S 
+ “MAKE THIS DIGIT ASCII 
«MAKE ASCII IF NOT ALREADY 





ta 


CKFPAAO FP11F FLTG PNT PRT A 


BINARY TO OCTAL 


5764 
5765 


(ASCII) AND TYPE 


112767 
112767 
000403 


0 
112767 


000040 
036420 
000032 


000002 


000002 
142574 
142602 


142572 
142566 
000004 


000002 
141200 
177044 
000062 


142520 
142472 


MACRO M1111 


000236 
000226 


000220 


142644 
142635 


000004 


142542 


000016 
000004 


7$: 


6$: 


8$: 


SOCNT: . 
SOFILL: . 
SOMODE: .WOR 
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(SP)+, (SP) 


0 
0 
0 
0 
0 


SEQ 0143 
i: SAVE FOR TYPING 
G0 TYPE THIS DIGIT 
“188 IF MORE TO DO 


:BR_IF DONE 
£3 INSURE LAST DIGIT | a T A BLANK 
THE LAST CIGIT 


; ORE R3 
SET THE STACK FOR RETURNING 


7 RETURN 

7: STORAGE FOR ASCII DIGIT 

32 TERMINATOR FOR TYPE ROUTINE 
7z0CTAL DIGIT COUNTER 

7zZERO FILL SWITCH 

7 NUMBER OF DIGITS TO TYPE 


-SBTTL APT COMMUNICATIONS ROUTINE 


1$: 


2s: 


$A 
#1,SFFLG 
RO,-(SP) 
R1,-(SP) 
SMFLG 


5$ 
MAPTENV, SENV 
3$ 


#APTSPOOL , SENVM 
3$ 


a4 (SP) ,RO 
#2,4(SP) 
—_. 


RO, $MSGAD 
(RO) + 


2$ 

$MSGAD .RO 
RO 

RO, $MSGLGT 
#4 SMSGTYPE 


$SFFLG 
12$ 
SENV 


12$ 
$MSGTYPE 


MASA eAASASALASLSAARASSESASLASSERSSSEAARAAR ARRAS ALAS ARR RR RASS RRS SD S| 


72TO REPORT FATAL ERROR 
::TO TYPE A MESSAGE 


::70 ONLY REPORT FATAL ERROR 


: PUSH RO ON STACK 
PUSH R1 ON STACK 
: SHOULD TYPE A MESSAGE? 


NO 
; ;OPERAT ING UNDER APT? 
:IF NOT: BR 
; : SHOULD SPOOL MESSAGES? 
NOT: BR 


GET MESSAGE ADDR. 
; ;BUMP RETURN ADDR 
:¢SEE wif. F DONE W/ LAST XMISSION? 


:2PUT NADDR IN MAILBOX 
FIND END OF MESSAGE 


::SUB START OF MESSAGE 
32GET MESSAGE LNGTH IN WORDS 
::PUT LENGTH IN MAILBOX 
;;TELL APT TO TAKE MSG. 


::PUT MSG ADDR IN JSR LINKAGE 
RETURN ADDRESS 
: 2PUSH 1% ON STACK 
SCALL TYPE MACRO 
; : SHOULD REPORT FATAL ERROR? 
::IF NOT: BR 
: : RUNNING UNDER APT? 


:1F NOT: BR 
IF INISHED LAST MESSAGE? 


oe ee 


B 12 
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APT COMMUNICATIONS ROUTINE SEQ 0144 FL 
036624 001375 BNE 11$ ;1F NOT: WAIT 
Beeoge 017667 000006 142464 MOV 4 (SP) ,SFATAL GET ERROR 7 
0366 062766 000002 000004 ADD #2,4(SP) ;BUMP RETURN ADDR. 
036642 005267 142450 INC SMSGTYPE 77 TELL abt TO TAKE ERROR 
036646 105067 000020 12$: CLRB SFFLG 3; CLEAR FATAL FLAG 
036652 105067 000013 CLRB SLFLG 7: CLEAR LOG FLAG 
036656 105067 000006 CLRB SMFLG 7iCLEAR MESSAGE FLAG 
036662 012601 MOV (SP)+,R1 7zPOP STACK INTO R1 
036664 012600 MOV (SP)+,R0 3zPOP STACK INTO RO 
036666 000207 RTS PC : ;RETURN 
036670 000 SMFLG: .BYTE 0 77MESSG. FLAG 
036671 000 $LFLG: .BYTE 0 77LOG FLAG 
036672 000 SFFLG: g Ld 0 ZZFATAL FLAG 
000200 APTSIZE=200 
000001 APTENV=001 
000100 APTSPOOL=100 
—_ 000040 APTCSUP=040 
5767 -SBTTL TTY INPUT ROUTINE 
FF RUA ARARAAAAEAAREAARREERRARARERERAARRRREERAEREARERHEARRARHRARRERRRREE 
» ENABL LSB 


erect it iit iii tii titi iii iitit iii iii iii titi titi iti i iii iii ts) 

> *SOFTWARE SWITCH REGISTER CHANGE ROUTINE. 

> *ROUTINE IS ENTERED FROM THE TRAP HANDLER, AND WILL 

>*SERVICE THE TEST FOR CHANGE IN SOFTWARE SWITCH REGISTER TRAP CALL 
;*WHEN OPERATING IN TTY FLAG MODE. 


036674 022767 000176 142236 $CKSWR: CMP ASWREG, SWR ii1S THE SOFT-SWR SELECTED? 
036702 001074 BNE 15$ i CH IF NO 

036704 105777 142234 TSTB = a$TKS ::CHAR THERE? 

036710 100071 BPL 15$ 331F NO, DON'T WAIT AROUND 
036712 117746 142230 MOVB  a$TKB,-(SP) “SAVE THE CHAR 

036716 042716 177600 BIC #°(177, (SP) ;: STRIP-OF F THE ASCII 
036722 022726 000007 CMP #7, (SP) + :1S IT A CONTROL G? 

036726 001062 BNE 15$ :3NO, RETURN TO USER 

036730 126727 142200 000001 CMPB -—«- SAUTOB,, 41 ARE WE RUNNING IN AUTO-MODE ? 
036736 001456 BEQ 15$ + ZBRANCH IF YES 

036740 104401 037303 TYPE ,SCNTLG >:ECHO THE CONTROL-G (*G) 
036744 104401 037310 SGTSWR: TYPE * $MSWR *: TYPE CURRENT CONTENTS 
036750 016746 141222 MOV SWREG, - (SP) : SAVE SWREG FOR TYPEOUT 
036754 104402 TYPOC O TYPE--OCTAL ASCII(ALL DIGITS) 
036756 104401 037321 TYPE SPINE W < {PROMPT FOR NEW SWR 

036762 005046 19$: CLR <(SP) ::CLEAR COUNTER 

036764 005046 CLR ~(SP) 3:7 THE NEW SWR 

036766 105777 142152 7$: STB. ~=—s-_ aS TKS * CHAR THERE? 

036772 100375 BPL 7$ ‘IF NOT TRY AGAIN 

036774 117746 142146 MOVB _a$TKB,-(SP) ::PICK UP CHAR 

037000 042716 177600 BIC #°(177, (SP) MAKE IY 7-BIT ASCII 
037004 021627 000025 9$: CMP (SP) ,#25 ‘1S IT A CONTROL-U? 

037010 001005 __ BNE 10$ + BRANCH IF NOT 

037012 104401 037276 TYPE /SCNTLU ::YES, ECHO CONTROL-U (*U) 
037016 062706 000006 208: ADD #6,SP +: IGNORE PREVIOUS INPUT 
037022 000757 BR 19$ *ZLET'S TRY IT AGAIN 

037024 021627 000015 108: CMP (SP) #15 tS IT A <CR>? 

037030 001022 BNE 16$ 33 (CH IF NO 

037032 005766 000004 TST 4 (SP) *:YES, IS IT THE FIRST CHAR? 
037036 001403 BEQ 11$ *SBRANCH IF YES 
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TTY INPUT ROUTINE SEQ 0145 


037040 016677 000002 142072 MOV 2(SP) ,aSwR 7; SAVE NEW SWR 

0370466 062706 000006 11$: ADD #6,SP 7;CLEAR UP STACK 

037052 104401 001313 148: TYPE ,SCRLF :zECHO <CR> AND <LF> 

Berner 126727 142055 900001 CMPB | aaah ; ;RE-ENABLE aa KBD ,NTERRUPTS? 


0 0C€1003 5 ; NO 
037066 012777 000100 142050 MOV #100,a$TKS RE-ENABLE TTY KBD INTERRUPTS 


037074 000002 15$: RTI 7 RETURN 

037076 004767 176756 16%: JSR PC, STYPEC 7zECHO CHAR 

037102 021627 000060 CMP (SP) ,460 77 CHAR < 0? 

037106 002420 BLT 18$ ; ;BRANCH IF YES 

037110 021627 000067 CMP (SP) ,467 7 CHAR > 7? 

037114 003015 BGT 18$ 7; BRANCH IF 3 

037116 042726 000060 BIC #60, (SP) + 72 STRIP-OFF ASCII 

037122 005766 000002 TST 2(SP) zz1S THIS THE FIRST CHAR 
037126 001403 BEQ 17$ ; BRANCH IF YES 


037130 006316 ASL (SP) :éNO, SHIFT PRESENT 
037132 006316 ASL (SP) i: CHAR ps TO MAKE 
037134 006316 ASL (SP) ROOM FOR NEW ONE. 
037136 005266 000092 17$: INC 2(SP) ‘IKEEP COUNT OF CHAR 
037142 056616 177776 BIS 2 (SP), (SP) :3SEN IN NEW CHAR 
037146 000707 BR 7$ ;;GET THE NEXT ONE 
037150 104401 001312 18$: TYPE , SQUES TYPE ?<CR><LF> 
037154 000720 BR 20$ SIMULATE CONTROL -U 


MAAS AAAAAARASRASAAAAALESASEASASASASALELESALA RAL AR ARS ALARA ESSA SASS 


SR THIS ROUTINE WILL INPUT A SINGLE CHARACTER FROM THE TTY 


Z*CALL: 
ie RDCHR y INPUT A SINGLE CHARACTER FROM THE TTY 
te RETURN HERE = CHARACTER IS ON THE STACK 
te *IWITH PARITY BIT STRIPPED OFF 
037156 011646 $RDCHR: MOV (SP) ,-(SP) PUSH DOWN THE PC 
037160 016666 000004 000002 MOV 4(SP) ,2(SP) 13 SAVE THE PS 
037166 105777 141752 1$: TSTB. = aSTKS T FOR 
037172 100375 BPL 1$ +A CHARACTER 
037174 117766 141746 000004 MOVB  a@$TKB,4(SP) ‘READ THE TTY 
037202 042766 177600 000004 BIC #°C(<177>,4(SP) ::GET RID OF JUNK IF ANY 
037210 026627 000004 000023 CMP 4(SP) ,#2 ::1S IT A CONTROL-S? 
037216 001013 BNE 3$ + BRANCH IF NO 
141720 : + WAIT FOR A CHARACTER 





a$TKS 
2$ 


141714 a$TKB,-(SP) 3: C 
037232 042716 177600 BIC #°C177, (SP) + SMAKE 
0372 000021 (SP)+ 421 - T 










1$ RE SUME 
: 4(SP) ,4140 T UPPER CASE? 
037254 002407 BLT 4$ : }BRANCH IF YES 

i 4(SP) 4175 :1S IT A SPECIAL CHAR? 
4$ CH IF YES 
#40,4(SP) 
4$: RTI => 
, ie $CNTILU: .ASCIZ /*U/<15><12> :: CONTROL ‘U 
037303 136 107 015 $CNTLG: .ASCIZ /*G/<15><1i2> 37 CONTROL ‘'G’’ 
037306 0 0 
037310 0 012 123° $SMSWR: .ASCIZ <15><12>/SWR = 
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TTY INPUT ROUTINE SEQ 0146 
037313 127 122 040 
037316 075 040 000 
037321 040 116 SMNEW: .ASCIZ / NEW = / 
037324 105 127 040 
939359 075 040 000 
5768 
£765 .SBTTL TRAP DECODER 
FF RAAAAAAAAARAEAAARAERARAARARAARARERARRARRRERAEAERAARAAAEARHHARRRAEAD 
2 *THIS ROUTINE WILL PICKUP THE LOWER BYTE OF THE ‘‘TRAP’’ INSTRUCTION 
“AND USE IT TO INDEX THROUGH THE TRAP TABLE FOR THE STARTING ADDRESS 
:*OF THE DESIRED ROUTINE. THEN USING THE ADDRESS OBTAINED IT WILL 
-*GO TO THAT ROUTINE. 
037332 010046 $TRAP: MOV RO,-(SP) 7: SAVE RO 
037334 016600 000002 MOV 2(SP) RO 7:GET TRAP ADDRESS 
037340 005740 TST -(RO) CKUP BY 2 
037342 111000 MOVB (RO) ,RO :3GET RIGHT BYTE OF TRAP 
037344 300 ASL Rg POSITION FOR INDEXING 
037346 016000 037366 Moy $TRPAD (RO) ,RO 3 INDEX TO TABLE 
037352 000200 RTS RO *GO TO ROUTINE 
:;THIS IS USE TO HANDLE THE "'GETPRI'' MACRO 
037354 011646 $STRAP2: MOV (SP) ,-('SP) 7zMOVE THE PC DOWN 
037356 016666 000004 000002 MOV 4(SP) ,2(SP) ::MOVE THE PSW DOWN 
037364 000002 RTI 7:RESTORE THE PSW 
-SBTTL TRAP TABLE 
Z*THIS TABLE CONTAINS THE a ADDRESSES OF THE ROUTINES CALLED 
:*BY THE ‘'TRAP’' INSTRUCTION 
: ROUT INE 
037366 037354 $TRPAD: ~ WORD $STRAP2 
037370 035646 STYPE 37 CALL=TYPE TRAP+1(104401) TTY TYPEOUT ROUTINE 
037372 036224 $TYPOC ;;CALL=TYPOC TRAP+2(104402) TYPE OCTAL NUMBER (WITH LEADING ZEROS) 
037374 0362 $TYPOS ;;CALL=TYPOS TRAP+3(104403) TYPE OCTAL NUMBER (NO LEADING ZEROS) 
037376 036240 STYPON ;;CALL=TYPON TRAP+4(104404) TY CTAL NUMBER (AS PER LAST CALL) 
037400 036744 $GTSWR ;;CALL=GTSWR TRAP+5(104405) GET SOFT-SWR SETTING 
037402 03667 SCKSWR ;;CALL=CKSWR TRAP+6(104406) TEST FOR CHANGE IN SOFT-SWR 
037404 037156 $SRDCHR ;CALL=RDCHR TRAP+7(104407) TTY TYPEIN CHARACTER ROUTINE 
037406 035552 $SAVREG ::CALL=SAVREG TRAP+10(104410) SAVE RO-R5 ROUTINE 
037410 035610 SRESREG ::CALL=RESREG TRAP+11(104411) RESTORE RO-R5 ROUTINE 
5770 037412 040330 -RSET 77 CALL=RSETUP TRAP+12(104412) ROUTINE TO RESET STACK AND FPS 
5771 037414 040322 .-LPER 32 CALL=LPERR TRAP+13(104413) ROUTINE TO SET LOOP ON ERROR ADDRESS 
2772 30 $TERM=.-$TRPAD 
5774 ent POWER DOWN AND UP ROUTINES 
SEAR AAAAAAEEEEAEAEREREAEKEAEREERAERERAERARAERRAERRKAERREEEKEEAERR EERE HEED 
POWER DOWN ROUTINE 
037416 012737 037574 000024 $PWRDN: MOV ASILLUP, @#PWRVEC ;;SET FOR FAST UP 
037424 012737 000340 000026 MOV #340, AAPWRVEC+2 ;:PRIO:7 
037432 010046 MOV RO,-(SP) ::PUSH RO ON STACK 
037434 010146 MOV R1,-(SP) + PUSH R1 ON STACK 
7436 010246 MOV R2,-(SP) s3 H R2 ON STACK 
037440 010346 MOV R3,-(SP) ::PUSH R3 ON STACK 
037442 010446 MOV R4,-(SP) sPUSH R4& ON STACK 
037444 010546 MOV R5,-(SP) 7 PUSH RS ON STACK 
037446 017746 141466 MOV aSwR ,- (SP) . PUSH @SWR ON STACK 
037452 010667 000122 MOV SP, $SAVR6 ::SAVE SP 
037456 012737 037470 000024 MOV ASPWRUP, AAPWRVEC ::SET UP VECTOR 





—-—_-——- — 
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DOWN AND UP ROUTINES 


037466 


037470 


796 037644 
5797 037650 
5798 037652 
5799 


5800 037656 


7664 
5803 037670 


000776 


012737 


037574 
000076 
000072 
000066 


141620 


037416 
000340 


000020 
175234 


001702 
177400 
001116 


001114 
177400 


001116 
040230 
000377 
000004 


000024 


000024 
000026 


000002 


001234 


[RR RARE RENEE RETR R RR ER EERE EE RRE NEARER ERE RER HERE RE REE ERE EES 


“POWER UP ROUTINE 
UP: 


1$: INC 


SPWRMG : 
SPWRAD : 


SILLUP: 
$SAVR6: 0 


. SBTTL 


#EILLUP , a4PWRVEC sess! FOR FAST DOWN 
SSAVR6, SP ::GET SP 
SSAVR6 ;;WAIT LOOP FOR THE TTY 


SSAVR6 szWAIT FOR THE INC 

1$ ;;0F WORD 

(SP)+,aSwWR 7zPOP STACK INTO @SWR 
(SP)+,R5 72:POP STACK INTO R5 
(SP)+,R4 7zPOP STACK INTO R4 
(SP) +,R3 77POP STACK INTO R3 
(SP)+,R2 ;zPOP STACK INTO R2 
(SP)+,R1 ;zPOP STACK INTO R1 
(SP) +,RO 7zPOP STACK INT 


33 NTO RO 
#SPWRDN, AAPWRVE C i SET UP THE POWER DOWN VECTOR 
#340, a#PWRVEC+2 ;:PRIO:7 

REPORT THE POWER FAILURE 


POWERM TPOWER FAIL MESSAGE POINTER 
(PC) +, (SP) 7ZRESTART AT START 
START + ¢RESTART ADDRESS 
#20,2(SP) 3: CLEAR ‘'T’’ BIT 
$TBIT T:CLEAR THE ‘T’' BIT FLAG 
;THE POWER UP SEQUENCE WAS STARTED 
oe ; BEFORE THE POWER DOWN WAS COMPLETE 


PUT THE SP HERE 


ERROR TYPE OUT ROUTINE 


JU AAR AEE REREREEREKEEREEREEREREEREKKEEEEEREEERREERE ERE EN EE 
ene eee REPRE EERE REAR ARRRS ARERR ASAR SARE RAR RRA RRR ERR SAAR SAAS SS | 


:*THIS ROUTINE IS CALLED TO TYPE AN ERROR MESSAGE WHICH IS INCLUDED 


;*IN THE ERROR MESSAGE DATA TABLE. 


IT IS CALLED BY THE SERROR ROUTINE 


:*OR BY FIRST SETTING oN ag EQUAL TO THE ERROR TABLE ITEM TO BE PRINTED 
: *OUT AND THEN lene 


© 


ERTYPE: TYPE 
WOR 





PC. SERTYPE 


TYPE A CRLF 
SCRLF 
@4STSTNM, aS TMPO 
#177400, a#$TMPO 
@ASERRPC ,a#$TMP 1 
RO,-(SP) 


a4$1TEMB,RO 
+ cies 


sGET PC OF CALL 
SAVE RO 
;GET THE ITEM NUMBER, 


@ASERRPC ,~- (SP) 
@#ERTS 
#377 ,RO 


4(SP),RO 
(RO) ,RO 


7IF ZERO THEN JUST 
SPRINT THE PC 


coe Ck 
SEQ 0147 FL 
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ERROR TYPE OUT ROUTINE SEQ 0148 | 





5804 037672 062700 000400 ADD #600,R0 

52805 os7er, 005 208: DEC RO ;OTHERWISE MAKE RO AN 
5806 037700 006 ASL RO : INDEX FOR THE TABLE. 
5807 037702 006 300 ASL RO 

5808 0377 006 ASL RO 

rs 44 835766 062700 001442 ADD ASERRTB,RO 

5811 037712 012037 037722 MOV (RO) +, a#2$ sPICK UP THE ADDRESS 
5812 037716 001404 BEQ 3$ sOF THE EM, ERROR MESSAGE 
5813 037720 104401 TYPE 

5814 037722 000000 2%: . WORD 

5815 037724 104401 TYPE 

5816 037726 001313 ~WORD $CRLF 

5818 037730 012037 037740 34: MOV (RO)+, aast :GET THE DH,DATA HEADER 
5819 037734 001404 BEQ 5$ 

5 37736 104401 TYPE 

5821 037740 0000 é$: wOR 0 

5822 037742 104401 TYPE 

as? 037744 001313 -WORD  $CRLF 

5825 037746 010146 58: MOV R1,-(SP) : SAVE R1,R2 AND R3 
5826 037750 010246 MOV R2,-(SP) 

2734 037752 010346 MOV R3,-(SP) 

5829 037754 012001 MOV (RO)+,R1 ;GET THE ADDRESS OF THE 
5830 DATA TABLE. 

5831 037756 001001 BNE 63% 

te 037760 000516 BR ERTS RETURN IF NO DATA. 
5834 037762 011000 6$: MOV (RO) ,RO ;GET A POINTER TO THE DATA 
5835 sFORMAT TABLE. 

5836 037764 105710 ERT1: TSTB (RO) FORMAT ZERO? 

434 037766 001003 BNE 7$ 

5839 037770 013146 MOV a(R1)+,-(SP) ;FORMAT ZERO SO TYPF 
5840 037772 104402 TYPOC AN OCTAL NUMBER 

5841 037774 000502 BR FRT2 

5842 

5843 037776 7$: 

5844 037776 122710 000002 8$: CMPR #2, (RO) FORMAT Tw? 

rs oF 040002 001010 BNE %$ 

5847 013102 MOV a(R1)+,R2 sFORMAT TWO SO TYPE TwO 
5848 012246 MOV (R2)+,=(SP) ZOCTAL NUMBERS. 

5849 040010 104402 TYPOC 

5850 040012 104401 TYPE 

5851 040014 040450 .WORD SPACE 

5852 0400 011246 MOV (R2) ,-(SP) 

5853 040020 104402 TYPOC 

pore 0400, 67 ERT2 

5856 0400 122710 000003 : CMPR #3, (RO) FORMAT THREE? 

r 344 040030 001020 FINE 10$ 

5859 040032 013102 MOV a{R1)+,R2 FORMAT THREE SO TYPE 
5860 040034 012246 (R2)+,=( SP) s* OUR OCTAL NUMBERS. 
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ERROR TYPE OUT ROUTINE SEQ 0149 
5861 040036 104402 TYPOC 
04 104401 TYPE 
5863 0400462 040450 ~WORD SPACE 
040044 012246 MOV (R2)+,=(SP) 
5 04 104402 TYPOC 
5 0400 106401 TYPE 
5867 040052 040450 .WORD SPACE 
5868 040054 012246 MOV (R2)+,=(SP) 
5869 040056 104402 TYPOC 
5870 040060 104401 TYPE 
5871 040062 040450 -WORD SPACE 
5872 04 011246 MOV (R2),=(SP) 
5873 040066 104402 TYPOC 
rs th 040070 000444 ERT2 
5876 040072 122710 000004 10$: CMPB #4,(RO) FORMAT FOUR? 
rs iA 040076 001004 BNE 1$ 
5879 040100 013146 Vv a@(R1)+,=-(SP) ;FORMAR FOUR SO TYPE 
5880 040102 104403 TYPOS ;AN OCTAL NUMBER 
5881 01 016 .BYTE 16 ; SUPPRESSING LEADING ZEROES. 
5882 040105 000 -BYTE O 
gear 01 0004 35 5h ERT? 
5885 040110 122710 000005 11$: CMPR #5, (RO) ZFORMAT FIVE? 
re oy 040114 001005 BNE 13$ 
5888 040116 012137 040124 V (R1)+,@412$ ZFORMAT FIVE SC TYPE AN 
5889 040122 104401 TYPE zASCIZ STRING. 
040124 000000 12%: -WORD 0 
sal 01 000427 BR ERTS 
5893 040130 722710 000011 1%$: CMPR #11, (RO) ;FORMAT ELEVEN? 
001005 15$ 
Hee ee Te | eoareu_u5Q<5qQqqqquQuauurrrraeaeaay——————EE = a 
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ERROR TYPE OUT ROUTINE SEQ 0150 
5897 040136 013137 040144 MOV a(R1)+,aal4$ sFORMAT ELEVEN SO PICK 
5898 040142 104401 TYPE A POINTER TO AN ASCIZ 
5899 040144 000000 14$: -WORD 0 7 STRING. 
3300 040146 000417 Mee ERT3 
5902 040150 122710 000012 15$: cMPB #12,(RO) FORMAT TWELVE? 
raa'ty 040154 001011 BNE 17$ 
5905 040156 013102 MOV a(R1)+,R2 FORMAT TWELVE SO TYPE 
5906 040160 012703 000006 MOV #6 ,R3 TYPE SIX OCTAL NUMBERS 
5907 040164 012246 16$: MOV (R2)+,=(SP) 
5908 040166 104402 TYPOC 
5909 040170 104401 TYPE 
5910 040172 040450 .WORD SPACE 
5911 040174 077305 SOB R3,16$ 
aA 040176 000401 bee ERT2 
are 040200 000000 17$: HALT UNDEFINED FORMAT FOR DATA????? 
5916 040202 104401 ERT2: TYPE PRINT A TAB AFTER TYPING | 
5917 040204 040446 .WORD $T7AB zAN DATA TABLE ENTRY 
5918 :OF ALL FORMATS EXCEPT 
rah sASCIZ, FORMATS 5 OR 11 | 
5921 040206 005200 FRT3: INC RO :POINT TO THE NEXT FORMAT 
5922 040210 005711 TST (R1) END OF DATA TABLE. 
5923 040212 001401 BEQ ERT4 
5924 040214 000663 BR ERT1 
5926 040216 104401 ERT4: TYPE 7 DONE . | 
5927 040220 001313 .WORD $CRLF 
5928 040222 012603 MOV (SP)+,R3 RESTORE R1,R2 AND RZ 
5929 040224 012602 MOV (SP)+,R2 | 
5930 040226 012601 MOV (SP)+,R1 
5931 040230 012600 ERTS: MOV (SP) +,RO RESTORE RO. 
293¢ 040232 000207 RTS PC :AND RETURN. 
5934 
5935 
5936 
5937 .SBTTL FPP SPURIOUS TRAP TO 244 HANDLER 
5938 SD RR ERE EERE EERE REE ERE REE EER EERE REE RE 
LEAR ERE RARER AEE ERRAAERAKRAEARARRAARR ARES 
5939 :*THIS ROUTINE HANDLES UNEXPECTED TRAPS TO THE FPP TRAP VECTOR AT 244. 
5940 :*THE LAST FPP INSTRUCTION EXECUTED AND ITS ADDRESS HAS BEEN RECORDED 
aa :*THESE ALONG WITH THE FEC, FPS AND PC OF TRAP ARE REPORTED. 
+ ‘ 
5943 040234 011637 001236 FPSPUR: MOV (SP) ,a&#$TMP2 SAVE PC OF TRAP. 
5944 040240 022626 CMP (SP)+, (SP)+ SRESTORE SP. | 
5945 040242 170200 STFPS RO :GET FPS 
5946 040244 010037 001240 MOV RO, aS TMP3 
5947 040250 170300 STST R iGET FEC 
5948 040252 010037 001242 MOV RO, a#$TMP4 
5949 040256 104211 1$: ERROR +211 ; 
5950 040260 104412 RSE TUP :GO INITIALIZE THE FPS AND STACK; AND 


;SEE IF THE USER HAS EXPRESSED 
3 THE DESIRE TO CHANGE THE SOF TWARE 
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FPP SPURIOUS TRAP TG 244 HANDLER SEQ 0151 


;VIRTUAL CONSOLE SWITCH REGISTER (HAS 
THE USER TYPED CONTROL G?). 


5951 040262 000137 034542 JMP a4 $e OP 

5952 

5953 

5954 -SBTTL (CPU SPURIOUS TRAP TO 4 HANDLER 

5955 SF RARER AAARAAAAARARAAAARARARARAREAERARRARAREERAAARAERRRARERARERRAERARES 


RRR EATER ARRARARHRERRRERRAEKRERRREEREKREHREEHR RHEE 





pats ;*THIS ROUTINE REPORTS UNEXPECTED CPU TRAPS TO VECTOR 4. 
5958 040266 011637 001236 CPSPUR: MOV (SP) ,@#$TMP2 SAVE PC OF TRAP. 
5959 040272 022626 CMP (SP)+, (SP) + 
5960 040274 104212 1$: ERROR +212 
5961 040276 104412 RSE TUP 3GO INITIALIZE THE FPS AND STACK; AND 
iSEE IF THE USER HAS EXPRESSED 
;THE DESIRE TO CHANGE THE SOF TWARE 
:VIRTUAL CONSOLE SWITCH REGISTER ‘HAS 
; THE USER TYPED CONTROL G?). 
5962 040300 000737 034542 JMP @F$E OP 
5963 
5964 
5965 .SBTTL (CPU SPURIOUS TRAP TO 10 HANDLER 
5966 PLR EERE EERE REE ERE EEE EER Ee 
TDI IIIIIIOIO IID IIIIIIIIDIOIIIUIUISIIUIUIIIIUIOIUIUIUIOIUUIUIIIUIDI Un tt ttt 
74 ;*THIS ROUTINE REPORTS UNEXPECTED CPU TRAPS TO VECTOR 10. 
5969 040304 011637 001236 CPTWO: MOV (SP) ,@A#$TMP2 ;SAVE PC OF TRAP. 
5970 040310 022626 CMP (SP)+,(SP)+ 
5971 040312 106213 1$: ERROR +213 
5972 040314 104412 RSE TUP 3GO INITIALIZE THE FPS AND STACK; AND 
;SEE IF THE USER HAS EXPRESSED 
3 THE DESIRE TO CHANGE THE SOF TWARE 
;VIRTUAL CONSOLE SWITCH REGISTER (HAS 
;THE USER TYPED CONTROL G?). 
on 040316 000137 034542 JMP @aF$E OP 
5975 
5976 
5977 
5978 -SBTTL SET LOOP ON ERROR ADDRESS ROUTINE 
5979 DIU IIOIIDIUIIIIOIDIIIDIIIIOIOIOIIUIDIDIOIIDIDIIIUUIOIIUIDIOIIIUIDIUIDIDR IO On tt 
DOU IUICIIIIDIOIIIIIUIDIIUIOIIIIUIDIOIUIUIDIOIIUIDIUIOIIDDIDIUIDIOIIUIIDIOIIUIIIO IDO Di 
5980 :* 
5981 040322 011637 001110 -LPER: MOV (SP) ,@#$LPERR 
ra 040326 000002 RTI 
5984 -SBTTL FLAG RESET AND CONSOLE TEST ROUTINE 
5985 DDO IIISIIOIIOIIIIUIOIOIIIOIDIOIUIUIOIOIOIUIOIIOIIUIOIUIOIUIOOIIOUIOIOIIO OE rit 
DOO IO IIOIIIDIIIOIIIUIDIUIOIOIIUIDIUIOIOIOIOIIUIDIDIDIUISIOIOIUIOIIUIOUIUIUIIOR Dn itt 
5986 :*THIS ROUTINE WILL BE CALLED AT THE END OF EACH TEST TO 
5987 ;*RESET THE STACK, CLEAR THE FPS AND SEE IF THE USER HAS TYPED 
5988 ;* CONTROL G ON THE TERMINAL. IF THE USER HAS TYPED CONTROL G AND 
5989 ¢* THERE IS NO PHYSICAL CONSOLE SWITCH REGISTER THEN THE CONTENTS 
5990 2*OF THE SOFTWARE SWITCH REGISTER WILL BE TYPED IN OCTAL ON THE 
+44) ;* TELETYPE AND THE USER CAN MODIFY IT. , 
5993 040330 023727 001140 177570 RSET: CMP @ASWR 4177570 SEE IF THERE IS A PHYSICAL 





J 12 
CKFPAAQ FP1IF FLTG PNT PRT A MACRO M1111 26=SEP=79 0%:38 PAGE 20-2 
FLAG RESET AND CONSOLE TEST ROUTINE “4 SEQ 0152 
; CONSOLE SWITCH REGISTER. 
;BRANCH IF NO. 
;OTHERWISE TYPE THE CONTENTS 
OF THE PROGRAM VIRTUAL SWITCH REGISTER 
AND GIVE THE USER A CHANCE TO 
sMODIFY IT. 
040234 000244 : #FPSPUR , @AFPVECT 
040266 000004 #CPSPUR , @ERRVE CT 


040304 000010 
;SAVE_RETURN ADDRESS. 
001100 #STACK, SP TRESET THE STACK POINTER. 
RG SCLEAR THE FPS. 
R 


(RO) ;RETURN. 
-NLIST BEX 
;SPECIAL MESSAGES: 
: .ASCIZ <CRLF>*POWER FAILURE. PROGRAM RESTARTING. °<CRLF> 
al 


<CRLF>"PC OF LAST FPP INSTRUCTION EXECUTED: *<TAB> 
<CRLF>*LAST FPP INSTRUCTION EXECUTED: *<TAB> 
<CRLF>*FLOATING POINT STATUS REGISTER: 
~~ » 

s Hy e 


<TAB>" INSTRUCTION FAILED. '<CRLF> 

"EITHER A BAD CONSTANT WAS GENERATED OR ° 
*MICROPROGRAM FLOW WENT’ 

<CRLF>*FROM STATE ° 

"TO STATE ' 

<CRLF>"* INSTEAD OF ° 

<CRLF>*THEREBY EXECUTING A ' 

<TAB>" INSTEAD OF A ‘ 

<TAB>" INSTRUCTION. *<CRLF> 

* TEST. *<TAB>'PC OF CALL.'<TAB>'PC OF ERROR 
"GOT FPS. EXPECTED FPS. '<CRLF> 

NOOP11: .ASCI "A BAD CONSTANT MAY HAVE BEEN USED. °<CRLF> 

LFPS1: . <TAB>'LDFPS'<TAB>'REG' 

LD1: ‘ <TAB>'LDD'<TAB>' (REG) ,A'<TAB>'//FSRCAO0//' 
<TAB>'LDD'<TAB>'A,A' 
<TAB>'STFPS'<TAB>'REG' 
<TAB>'STD'<TAB>'A, (REG) ' 
<TAB>'STD'<TAB>'A,A' 
<TAB>'CFCC' 
<TAB>'SETF* 
<TAB>'SETD' 
<TAB>'SETI' 
<TAB>'SETL' 
<TAB>' ILLEGAL FPP INSTRUCTION’ 
<TAB>'STST'<TAB>'REG' 
<TAB>'ILLEGAL FPP INSTRUCTION (FID=1)° 
* TEST. '<TARB>'PC OF CALL. '<TAB>'PC UF TRAP. *<TABD>'FPS. *<CRLF> 
Mino . 
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FLAG RESET AND CONSOLE TEST ROUTINE SEQ 0153 F| 
6051 041627 103 117 116 MS3: -ASCIZ ‘CONTENTS OF LOCATIONS ' 
6052 041656 040 124 110 MS4: -ASCIZ ‘ THROUGH ' 
6053 041670 106 101 111 MSS: -ASCIZ ‘FAILURE IN THE MICROPROGRAM FLOW.* 
6054 041732 102 117 116 MS6: eASCIZ ‘CONTROL WENT ' 
6055 041750 106 122 117. MS7: -ASCIZ ‘FROM STATE ° 
6056 041764 040 124 117 MS10:  .ASCIZ ‘ TO STATE ° 
6057 041777 102 125 124 MS11:  .ASCIZ ‘BUT SHOULD HAVE GONE’ 
6058 042024 103 117 116 MS12:  .ASCIZ ‘CONTROL FLOW SHOULD HAVE GONE’ 
6059 042062 102 125 124 MS13: -ASCIZ ‘BUT DID NOT.’ 
6060 042077 040 040 124 ™MS14: .ASCII * TEST.*<TAB>'PC OF CALL.*<TAB>'PC OF ERROR. '<TAB> 
6061 042140 107 117 124 -ASCIZ "GOT PC.'<TAB>"EXPECTED PC." 
6062 042165 111 116 123 MS15:  .ASCIZ ‘INSTRUCTION TESTED: ' 
6063 042212 040 117 122 MS16: .ASCIZ * OR ' 
6064 042217 124 105 123 MS17:  .ASCIZ ‘TESTING ACCUMULATOR ' 
6065 042244 132 105 122 MNUMO: .ASCIZ ‘ZERO ' . 
04225 117 116 105 MNUM1: .ASCIZ ‘ONE ' 
6067 042257 124 127 117 MNUM2: .ASCIZ ‘TWO ' 
6068 042264 124 110 122 MNUM3: .ASCIZ ‘THREE ' 
9 04227 106 117 125 MNUM4: .ASCIZ ‘FOUR ' 
70 042301 106 111 126 MNUMS: .ASCIZ ‘FIVE ' 
6071 042307 040 040 124 MS20: .ASCIZ ‘ TEST.'<TAB>'PC OF CALL.'<TAB>'*PC OF ERROR." 
6072 042350 104 101 124 MS21: ASCIZ ‘DATA (FLOATING POINT NUMBER): ' 
6073 042407 114 117 107 MS22: ASCIZ ‘LOGICAL AND OF FAILING ' 
6074 042437 114 117 107 MS23:  .ASCIZ ‘LOGICAL OR OF FAILING ' 
6075 042466 040 040 124 MS24:  .ASCII ‘ TEST."<TAB>'PC OF CALL.'<TAB>'PC OF ERRORS. *<TAB> 
6076 042530 116 125 115 -ASCIZ "NUMBER OF ERRORS(OCTAL).' 
6077 042561 105 130 120 MS25: ASCIZ ‘EXPECTED DATA IN ' 
6078 042603 107 117 124 MS26: ASCIZ ‘GOT DATA IN ' 
6079 042620 200 101 103 MS27: ASCIZ <CRLF>'ACO= ' 
6080 042627 200 101 103 MS30: ASCIZ <CRLF>'AC1= ' 
6081 26 200 101 103 MS31: ASCIZ <CRLF>‘AC2= ' 
6082 042645 200 101 103 MS32: ASCIZ <CRLF>'AC3= ' 
6083 042654 200 101 103 MS33: ASCIZ <CRLF>'AC4= ' 
266 200 101 103 MS34: ASCIZ <CRLF>'ACS= ' 
6085 042672 123 105 124 ™MS35: ASCIZ ‘SET ' 
042677 103 114 105 MS36: ASCIZ 'C , 
6087 042706 114 117 101 MS37: ASCIZ ‘LOADED DATA: ' 
6088 042724 122 105 101 ™S40: SCIZ ‘READ DATA: ' 
6089 042740 105 130 120 MS415: .ASCIZ ‘EXPECTED DATA: ' 
6090 042760 104 101 124 MS41: ASCIZ ‘DATA IN (RO) FSRC: ' 
6091 043 104 101 124 MS42: ASCIZ ‘DATA IN ACO: ' 
6092 043022 107 117 124 MS43: ASCIZ ‘GOT RESULT: ' 
6093 04 105 130 120 MS44: ASCIZ ‘EXPECTED RESULT: ' 
6094 
6095 
onoe ERROR MESSAGES: | 
6098 043061 114 104 106 EM1: -ASCIZ '‘LDFPS AND STFPS TEST FAILED." 
6099 043116 114 104 106 EM2: -ASCIZ 'LDFPS AND STFPS TEST ERROR SUMMARY." | 
6100 043162 103 106 103 EM3: -ASCIZ ‘CFCC TRANSFERED BAD DATA TO THE PSw.* 
6101 043227 103 106 103 EM4: eASCIZ ‘CFCC MODIFIED THE FPS REGISTER." 
6102 043267 125 116 105 EMS: -ASCIZ ‘UNEXPECTED FPP TRAP TO 244." 
6103 043323 125 116 105 EM6: -ASCIZ ‘UNEXPECTED CPU TRAP TO 4.’ 
6104 043355 125 116 105 EM?: -ASCIZ ‘UNEXPECTED CPU TRAP TO 10.° 
105 043267 EM10=EM5 
6106 043410 125 116 101 if Oe -ASCIZ "UNABLE TO DECODE FPP INSTRUCTION. TRAPPED TO 10." 
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FLAG RESET AND CONSOLE TEST ROUTINE SEQ 0154 
6108 EM13=0 
6109 043471 114 104 106 EM14: ASCII *LDFPS RO Moe IN THE FSRC FLOWS. ° 
6110 043533 = 040,sis124—Ss«éd:282 “ASCII * TRAPPED TO 4 
6111 063551 = 200s 104—Ss1 “ASCIZ <CRLF>'DID NOT GO FROM STATE 400 TO 670.° 
6112 063614 123 «= 124.«S «106 EMIS: [ASCII 'STFPS R1 FAILED IN THE FDST FLOWS." 
6113 043656 0402 104-—Ss«éd1222 "ASCII ' TRAPPED TO 4." 
6114 063676 200 106—Ss171 “ASCIZ <CRLF>"DiD NOT GO FROM STATE 634 TO 710.' 
6115 043737 101 116 040 EM16: -ASCIZ an ILLEGAL FPP INSTRUCTION DID NOT TRAP, * 
6116 044010 101 116 040 -«EM17: «= LASCIT "AN ILLEGAL FPP INSTRUCTION’ 
6117 044062 = 200's—s124—Sté«*222D “ASCII ‘<CRLF>'TRAPPED TO 244, BUT FAILED TO SET ° 
6118 044105 124 110 105 "ASCIi ‘THE FPS CORRECTLY. '<CRLF>'EITHER A BAD CONSTANT ° 
6119 044156 127 101 123 TASCIZ "WAS GENERATED OR THE ALU LOGICAL OR FUNCTION FAILED." 
6120 044243 101 116 040 EM20: -ASCII ‘AN ILLEGAL FPP INSTRUCTION‘ 
6121 044275 040 124 122 -ASCII ° TRAPPED TO 244, BUT A SUBSEQUENT ° 
6122 044337 040,sis123—Sts«d120 “ASCII. STST*<CRLF> 
6123 044 106 101 111 -ASCIZ "FAILED TO PICK UP THE CORRECT FEC CODE = 2.' 
6124 044421 124 123 EM21: -ASCII *STST R4 FAILED IN a DESTINATION FLOWS.' 
6125 044471 0402s«s124—St«<1222 TASCI: ' TRAPPED TO 4. '<CRLF> 
6126 044510 104 111 104 -ASCIZ m+ NOT GO FROM STATE 636 TO 710.° 
6127 044552 101 116 040 EM22: ASCII "AN ILLEGAL FPP INSTRUCTION, ° 
6128 044605  127-—S—«*111 124 “ASCIZ ‘WITH INTERRUPTS DISABLED, ' 
6129 044552 EM23=EM22 
6130 044552 EM24=EM22 
6131 044637 123 117 125 EM25: eASCII ‘SOURCE LOCATIONS MODIFIED BY, LDD.' 
6132 044701 200 101 040 -ASCIZ <CRLF>*A DATO WAS PERFORMED INSTEAD OF A DATI.° 
6133 044752 1142S s«104.=Ss«d1004sSsEMZ6: += CASCII. «"LDD (RO) ACO FAILED. '<CRLF> 
6134 044777 ss 122-'i(i«(—Cts—t«iO “ASCIZ ‘RO WAS MODIFIED. * 
613 044752 EM27=EM26 
6136 045020 110 105 €M30: -ASCII ‘THE PC WAS BAD AFTER . 
6137 045046 101 116 040 -ASCIZ ‘AN FPP INSTRUCTION, ° 
6 045072 123 124 104 EM31: ASCII ‘STD ACO, (RO) FAILED. "<CRLF> 
6139 045117 060 040 “ASCIZ ‘RO WAS MODIFIED. * 
614 045072 EM32=EM31 
6141 045140 123 124 104 €M33: -ASCII ‘STD ACO, ow, FAILED. ‘<CRLF> 
6142 045165 117 125 = 124 “ASCIZ "OUTPUT 
6143 045201 123 124 104 EM34: ASCII ‘STD ACO, BRO) FAILED IN 7 FDST FLOWS. ‘ 
6144 045247 200 124 110 »ASCIZ <CRLF>* THE (BUT GR7) FORK FAILED. 
5 045303 114 104 104 EM35: -ASCII ‘LDD (RO) ,ACO FAILED IN THE FSRC FLOWS. . 
6146 045351 00 124 110 eASCIZ <CRLF>' THE (BUT GR7) FORK FAILED. 
6147 045405 123 124 104 EM36: [ASCII "STD ACO, (RO) FAILED IN THE FDST FLOWS." 
6148 045453 200 124 110 TASCIZ <CRLF>'THE (BUT FD) FORK FAILED 
045506 114 104 104 EM37: -ASCII ‘LDD (RO),ACO FAILED IN THE FSRC FLOWS.’ 
6150 045554 200 124 110 “ASCIZ <CRLF>*THE (BUT FD) FORK FAILED. 
1045607 114 1046 104 EM40: ‘ASCII ‘LDD (RO),ACO OR THE STD ACO, (RO) FAILED. 
6152 045657 200 102 101 “ASCIZ <CRLF>'"BAD DATA WAS DETECTED AFTER’ \ SEQUENCE OF ‘THE TWO INSTRUCTIONS." 
6153 045760 106 120 123 M41: “ASCIZ ‘FPS BAD AFTER EXECUTION OF: ' 
6158 046015 EMG2: 
046015 114 104 104 -ASCII /LDD (RO),ACO FAILED IN THE FSRC FLOWS./<CRLF> 
046064 124 110 105 -ASCIZ /THE (BUT FSRC) FORK FAILED. TRAPPED TO 4./ 
6159 046136 EMG3: 
046136 123 124 104 «ASCII /STD “e. yo FAILED IN THE FDST FLOWS./<CRLF> 
046205 124 110 105 -ASCIZ /THE (BUT FDST) FORK FAILED. TRAPPED TO 4./ 
rb 046257 seat 120 120 seg -ASCIZ ‘FPP ACCUMULATORS DATA TEST FAILED. 
6162 046322 106 120 120 EM46 e-ASCIZ '"FPP ACCUMULATORS DUAL ADDRESSING TEST FAILED." 
6167 046400. EMG 
046400 114 104 040 ASCII /LD AC’. 4CO FAILED IN THE FSRC FLOWS./ 
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CKFPAAQ FP1IF FLTG PNT PRT A MACRO M1111 26=SEP=79 09:38 PAGE B08 
FLAG RESET AND CONSOLE TEST ROUTINE SEQ 0155 


A /THE (BUT FSRC) FORK FAILED. TRAPPED TO 4./ 
EMSO: "LD AC1,ACO FAILED en THE F SRC FLOWS. * 

eA ‘THE (BUT FD) FORK FAILED." 
EMS1: "LD AC1,ACO TRANSFERRED BAD DATA.' 


EMS2: 
/LDD (RO)+,ACO FAILED IN THE FSRC FLOWS./ 
/THE (BUT FSRC) FORK FAILED. TRAPPED TO 4./ 


/LDD (RO)+,ACO FAILED th THE FSRC FLOWS./ 
<CRLF>*RO WAS BAD. *<CRL 

"EITHER A BAD CONSTANT ws GENERATED OR'<CRLF> 
\DID NOT GO FROM STATE 627 TO 322.\ 


/LDD (RO)+,ACO TRANSFERRED BAD DATA./ 


/LDD =(RO),ACO FAILED IN THE FSRC FLOWS./ 
/THE (BUT FSRC) FORK FAILED. TRAPPED TO 4./ 


/LDD -(RO),ACO FAILED sé THE FSRC FLOWS./ 
<CRLF>'RO WAS BAD. *<CRL 

"EITHER A BAD CONSTANT WAS GENERATED OR*<CRLF > 
\DID NOT GO FROM STATE 627 TO 324.\ 


/LDD -(RO),ACO TRANSFERRED BAD DATA./ 


/LDF (RO) +, ACO FAILED cs THE FSRC FLOWS./ 
<CRLF>'RO WAS BAD. '<CRL 

"EITHER A BAD CONSTANT WAS GENERATED OR'<CRLF> 
\DID NOT GO FROM STATE 627 TO 322.\ 


/LDF (RO)+,ACO TRANSFERRED BAD DATA./ 
"LDF (RO) +, ACO FAILED IN THE FSRC FLOWS.* 
<CRLF>*THE (BUT FD) FORK FAILED. *<CRLF > 
"WENT FROM STATE 441 TO 077, ‘ <CRLF > 

4 ye OF FROM 441 TO 076." 

D_#NUM, ACO FAILED IN THE FSRC FLOWS.’ 
<CRLFD" THE (BUT GR7) FORK FAILED. '<CRLF> 
"WENT FROM STATE 207 x 1aee * <CRLF > 
' INSTEAD OF FROM 207 176.° 

LDD #NUM,ACO FAILED IN THE FSRC FLOWS." 
<CRLFD'A BAD CONSTANT WAS USED WHEN THE PC WAS INCREMENTED. * 
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6199 050602 
050602 

6221 050645 
050645 
050715 
050767 


051041 
6222 051076 
051076 
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/LDD #NUM,ACO TRANSFERRED BAD DATA./ 


"LDD @(RO)+,ACO FAILED IN THE FSRC FLOWS." 
<CRLF>"*THE (BUT FSRC) FORK FAILED. TRAPPED TO 4.° 
<CRLF>\WENT FROM STATE 627 TO EITHER 326 OR 326,\ 
<CRLF>\INSTEAD OF FROM 627 TO 323.\ 


*LDD a(RO)+, ACO FAILED IN THE FSRC FLOWS." 
<CRLF>'THE (BUT FSRC) FORK FAILED. TRAPPED TO 4." 


*LDD a(RO)+,ACO FAILED IN THE FSRC FLOWS. ' 
‘THE (BUT FD) FORK FAILED." 


*LDD @(RO)+,ACO*<CRLF> 
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051633 
6227 051670 
051670 
051740 
6228 052013 
052013 
052065 
6229 052115 
052115 
052134 
6230 052171 
052171 
6231 052231 
052 
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—M73: 
EM74: 


EM75: 
EM76: 


EM77: 
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-ASCIZ 
-ASCIZ 


-ASCII 
-ASCII 
-ASCII 
-ASCIZ 


-ASCII 
-ASCIZ 


-ASCII 
-ASCIZ 


ASCII 
-ASCIZ 


EM100: 
—M101: 


-ASCIZ 


-ASCII 
-ASCIZ 


EM102: 


-ASCII 
-ASCIZ 


—EM103: 


-ASCII 
-ASCIZ 


EM104: 
EM105: 


-ASCIZ 


-ASCII 
-ASC1Z 


-ASCII 
-ASCIZ 


-ASCI1 
-ASC1Z 


EM106: 


EM107: 


EM110: 
EM111: 


EM112= 
EM113: 


-ASCIZ 

-ASCII 

-ASCIZ 
EM111 


SEQ 0156 


"FAILED TO INCREMENT RO BY 2.' 

*LDD @(RO)+,ACO LOADED BAD DATA." 

*tDD @=-(RO),ACO FAILED IN THE FSRC FLOWS." 
<CRLF>*THE (BUT FSRC) FORK FAILED. TRAPPED TO 4.° 
<CRLF>\WENT FROM STATE 627 TO EITHER 326 OR 326,\ 
<CRLF>\INSTEAD OF FROM 627 TO 325.\ 


*LDD @=-(RO),ACO FAILED IN THE FSRC FLOWS.' 
<CRLF>"THE (BUT FSRC) FORK FAILED. TRAPPED TO 4." 


*LDD @-(RO) ACO FAILED IN THE FSRC FLOWS.* 
*THE (BUT FD) FORK FAILED.‘ 


*LDD a-(RO) ,ACO*<CRLF> 
"FAILED TO DECREMENT RO BY 2.° 


"LDD a-(RO),.ACO LOADED BAD DATA." 


"LDD NUM(RO) ACO FAILED IN THE FSRC FLOWS.' 
<CRLF>*THE (BUT FSRC) FORK FAILED. TRAPPED TO 4.' 


*LDD NUM(RO) ,ACO*<CRLF > 
‘FAILED TO AFFECT RO BY 2.' 


*LDD NUM(RO) ACO FAILED IN THE FSRC FLOWS. . 
‘THE (BUT FD) FORK FAILED.* 


*LDD NUM(RO),ACO LOADED BAD DATA." 


*LDD @NUM(RO),ACO FAILED IN THE FSRC FLOWS." 
<CRLF>"THE (BUT FSRC) FORK FAILED. TRAPPED TO 4.' 


*LDD @NUM(RO) ,ACO*<CRLF > 
"FAILED TO AFFECT RO BY 2.' 


"LDD @NUM(RO) ACO FAILED IN THE FSRC FLOWS. . 
"THE (BUT FD) FORK FAILED. 


"LDD @NUM(RO) ACO LOADED BAD DATA.' 
/LDD AC7,ACO FAILED TO TRAP TO 244./ 
<CRLF>/AC7 IS AN ILLEGAL ACCUMULATOR. / 


/LDD AC6,ACO FAILED TO TRAP TO 244,/ 
<CRLF>/AC6 IS AN ILLEGAL ACCUMULATOR. / 


"USE OF AN ILLEGAL ACCUMULATOR WITH FSRC MODE ZERO," 
<CRLF>*TRAPPED BUT FAILED TO SET FPS CORRECTLY." 


"USE OF AN ILLEGAL ACCUMULATOR WITH FSRC MODE ZERO," 
<CRLF>*TRAPPED BUT FAILED TO SET FEC CORRECTLY." 
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CKFPAAO FP11F FLTG PNT PRT A MACRO M1111 26=SEP=79 
FLAG RESET AND CONSOLE TEST ROUTINE 


53635 123 124 040 EM121: .ASCII 
6263 053701 200 124 110 -ASCIZ 
6264 053754 123 124 040 EM122: .ASCII 
5 054020 200 124 110 -ASCIZ 
054053 123 124 040 €—M123: .ASCIZ 
6267 054114 EM124: 
054114 106 120 123 ASCII 
054147 200 124 110 -ASCIZ 
6268 054207 EM125: 
054207 106 120 123 -ASCII 
054242 124 110 -ASCIZ 
6269 054277 114 104 1046 EM126: .ASCII 
6270 054333 106 123 ASCII 
6271 054362 124 110 105 ASCII 
6272 054415 200 127 105 ASCII 
6273 054451 200 111 116 -ASCIZ 
6274 054506 114 104 1046 €M127: .ASCII 
6275 054551 040 106 123 -ASCII 
6276 054574 200 124 110 ASCII 
0546 127 105 116 -ASCII 
6278 054663 200 111 116 -ASCIZ 
6279 054721 114 104 104 €M130: .ASCII 
6280 054755 106 123 122 ASCII 
6281 055000 102 125 124 ASCIZ 
6282 055021 EM131: 
055021 114 104 103 -ASCIZ 
6283 055061 EM132: 
1 114 104 103 ASCIZ 
6324 055121 EM133: 
055121 101 104 104 ASCIZ 
6325 055160 EM134: 
51 101 104 104 ASCIZ 
6326 055217 EM135: 
055217 123 125 102 ASCIZ 
6327 055256 EMi 36: 
055256 123 125 102 -ASC1Z 
6328 055121 EM137=EM1 33 
6329 055160 EM140=EM1 34 
6330 055217 EM141=EM135 
6331 055256 EM142=EM1 36 
6332 055315 EM143: 
055315 101 104 104 -ASC1Z 
6333 055350 EM144: 
055350 123 125 102 -ASCIZ 
6334 055315 EM145=EM143 
6335 055350 EM146=EM144 
6336 055403 EM147: 
055403 123 125 102 -ASCIZ 
6337 055403 EM150=EM147 
6338 055403 EM151=EM147 
6339 055435 EM152: 
— _ 055435 101 104 104 -ASCIZ 
340 055435 EM153=EM152 
6341 055467 EM154: 
055467 101 116 040 -ASCII 
055531 103 101 125 -ASCII 
055557 200 050 102 -ASCII 





8 13 
09:38 PAGE 20-7 
SEQ 0157 


*ST ACO, AC hy 4 a" THE FDST FLOWS. 

<CRLF>'THE (BUT FDST) FORK Ot TRAPPED TO 4." 
*ST ACO, AC1 FAILED IN THE FDST FLOWS. 

<CRLF>'THE (BUT FD) FORK FAILED. ' 

*ST ACO,AC1 TRANSFERRED BAD DATA.' 


"FPS BAD AFTER LDD (RO),ACO." 
<CRLF>\THE (BUT EZBT Y8) FORK FAILED. \ 


"FPS BAD AFTER LDD (RO),ACO.’ 
<CRLF>\THE (BUT ENBT) FORK ~~ \ 
a (RO) ,ACO TRAPPED T 


AND FI ‘ 

“THE (BUT FIUV) FORK FAILED. ° 
<CRLF>*WENT FROM STATE 256 r9 354," 
<CRLF>" INSTEAD OF FROM 256 TO 254.° 
EDD. (RO? ACO 0 FAILED, TO TRAP TO 244," 
<CRLFD* THE’ (But FIUV) FOR FAILED. ‘<CRLF> 
"WENT FROM STATE 256 TO 254,° 

<CRLF>' INSTEAD OF FROM 256 ine 354." 
"LDD (RO) -ACO TRAPPED 0 244 

"FSRC= 0. FIuy= | PORCREFS 

"BUT FEC WAS BAD. 

/LDCFD (RO),ACO LOADED BAD DATA. / 
/LDCDF (RO),ACO LOADED BAD DATA./ 
/ADDD (RO),ACO WITH (RO)=ACO=0 / 
/ADDF (RO),ACO WITH (RO)=ACO=0 / 
/SUBD (RO),ACO WITH (RO)=ACO=0 / 


/SUBF (RO),ACO WITH (RO)=ACO=0 / 
/ADDD (RO),ACO WITH (RO)=0 / 
/SUBD (RO),ACO WITH (RO)=0 / 
/SUBD (RO),ACO WITH 


ACO=0 / 


ZADDD (RO),ACO WITH ACO=0 / 


"AN OVERFLOW ERROR OC CURRED ON ADD*<CRLF > 
"CAUSING A_TRAP TO 244. 
<CRLF>' (BUT EZBT Y9 Y8) FORK IN STATE 420 OF OVER\UNDER FAILED. 
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FLAG RESET AND CONSOLE TEST AROUTINE 
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—EM156: 


EM157: 


EM160: 


EM161: 


EM162: 
EM163: 
EM164: 
EM165: 
EM166: 


EM167: 


—EM170: 


EM171: 


EM172: 


—M173: 


SEQ 0158 


<CRLF>'SHOULD HAVE GONE FROM STATE 420 TO 131." 


*AN UNDERFLOW ERROR OCCURRED ON ADD*<CRLF> 
* CAUS ING A_TRAP TO 244. 

<CRLF>' (BUT EZBT Y9 Y8) FORK IN STATE 420 o OVER\UNDER FAILED. 5 
<CRLF>*SHOULD HAVE GONE FROM STATE 420 TO 131. 


/ADDD (RO) as FAILED IN THE ROUND\TRUNK FLOWS. / 
<CRLF>"THE (BUT FD) FORK i WENT’ 

\FROM STATE 665 TO 113.\<CR 

\INSTEAD OF FROM 665 TO 313. \<CRLF>\WITH FT SET.\ 


/ADDD (RO) -ACO_ FAILED IN THE ROUND\ TRUNK FLOWS. / 


\INSTEAD OF FROM 665 TO Tis: \<CRLF>\WITH FT CLEAR.\ 


/ADDD (RO),ACO FAILED IN THE ROUND\TRUNK FLOWS./<CRLF> 
"THE FLOATING ag Le — USED INSTEAD OF THE DOUBLE CONSTANT '<CRLF> 
‘IN THE ROUND ALGORITHM 


ADDF (RO) fs FAILED IN THE ROUND\TRUNK FLOWS./<CRLF > 
"THE DOUBLE CONSTANT a ,USED INSTEAD OF THE FLOATING CONS TANT *<CRLF> 
"IN THE ROUND ALGORITHM 


/ADDD (RO),ACO PRODUCED A BAD RESULT./ 
/ADDF (RO),ACO PRODUCED A BAD RESULT./ 
\THE FPS WAS BAD AFTER ADDD (RO) ,ACO.\ 
\THE FPS WAS BAD AFTER ADDF (RO),ACO.\ 


ZADDD (RO) ,ACO PRODUCED A BAD RESULT ,/<CRLF > 
"PROBABLE ERROR IN THE ALIGN FLOWS. ' 


/ADDD (RO),ACO FAILED IN THE ALIGN FLOWS./<CRLF> 

\FLOW DID NOT FOLLOW THE PATH: STATE 476, TO 111, TO 014.\ 
<CRLF>\A BAD CONSTANT (NOT 57 DEC) \ 

"WAS USED IN THE ALIGN ALGORITHM.‘ 


/ADDF (RO) ,ACO PRODUCED A af RESULT ,/<CRLF > 
"PROBABLE ERROR IN THE ALIGN FLOWS. ' 


/ADDF (RO),ACO FAILED IN THE ALIGN FLOWS./<CRLF> 

\FLOW DID NOT FOLLOW THE PATH: STATE 476, TO 111, TO 014.\ 
<CRLF>\A BAD CONSTANT (NOT 25 DEC) \ 

"WAS USED IN THE ALIGN ALGORITHM." 


/ADDD (RO),ACO FAILED IN THE ALIGN FLOWS. /<CRLF> 

\FLOW DID NOT FOLLOW THE PATH: STATE 476, TO 011, TO 015.\ 
<CRLF>\A BAD CONSTANT (NOT 57 DEC) \ 

"WAS USED IN THE ALIGN ALGORITHM. * 


/ADDD (RO) ,ACO Arg IN THE ALIGN FLOWS./<CRLF> 
\FLOW DID NOT FOLLOW THE PATH: STATE 476, TO 611. TO 215.\ 
<CRLF>\A BAD CONSTANT (NOT 57 DEC) \ 
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FLAG RESET AND CONSOLE TEST ROUTINE SEQ 0159 


061021 127 101 123 -ASCIZ ‘WAS USED IN THE ALIGN ALGORITHM.‘ 
6357 061062 FM174: 
061062 101 104 104 eASCII /ADDF (RO),ACO FAILED IN THE ALIGN FLOWS./<CRLF> 
061133 106 114 117 “ASCII \FLOW DID NOT FOLLOW THE PATH: STATE 476, TO 011, TO 015.\ 
061223 200 101 040 eASCII <CRLF>\A BAD CONSTANT (NOT 25 ma \ 
061260 127 101 123 -ASC1Z ‘WAS USED IN THE ALIGN ALGORITHM 
6358 061321 FM175: 
061321 101 104 104 -ASCII  /ADDF ty -ACO “Wy IN THE ALIGN FLOWS./<CRLF> 
061372 106 114 117 “ASCII \FLOW DID NOT FOLLOW THE PATH: STATE 476, TO 011, TO 215.\ 
061462 200 101 040 eASCII <CRLF>\A BAD CONSTANT (NOT 25 DEC) \ 
061517 127 101 123 eASCIZ ‘WAS USED IN THE ALIGN ALGORITHM.‘ 
6359 061560 EM176: 
061560 101 104 104 -ASCII ‘ADDD (RO),ACO FAILED IN THE ADD-SUB FLOWS. °<CRiF> 
061633 104 11 104 -ASCIZ \DID NOT TAKE THE PATH: STATE 216, TO 442, TO 590.\ 
6360 061715 EM177: 
061715 101 104 104 -ASCII ‘ADDD (RO),ACO FAILED IN THE ADD-SUB FLOWS. '<CRLF> 
061770 104 111 104 -ASCIZ \DID NOT TAKE THE Pa.H: STATE 216, TO 042, TO 121.\ 
6361 062052 EM200: 
062052 101 104 104 -ASCII ‘ADDD (RO),ACO FAILED IN THE ADD-SUB FLOWS. *<CRLF> 
062125 104 111 104 -ASCIZ \DID NOT TAKE THE PATH: STATE 216, TO 440, TO 121.\ 
6362 062207 EM201: 
062207 101 104 104 -ASCII ‘ADDD (RO).ACO FAILED IN THE ADD-SUB FLOWS. *<CRLF> 
062262 104 111 104 -ASCIZ \DID NOT TAKE THE PATH: STATE 216, TO 440, TO 101.\ 
6363 062344 EM202: 
062344 101 104 104 ASCII ‘ADDD (RO),ACO FAILED IN THE ADD-SUB FLOWS. ‘*<CRLF> 
0624 104 111 104 eASCIZ \DID NOT TAKE THE PATH: STATE 216, TO 042, TO 101.\ 
6364 062501 , EM203: 
062501 101 104 104 -ASCII ‘ADDD (RO),ACO FAILED IN THE ADD~SUB FLOWS. '<CRLF> 
062554 104 111 104 -ASCIZ \DID NOT TAKE THE PATH: STATE 216, TO 440, TO 141.\ 
6365 062636 EM204: 
0626 101 104 104 -ASCII ‘ADDD (RO),ACO FAILED IN THE ADD-SUB FLOWS. ‘'<CRLF> 
062711 104 114 104 -ASCIZ \DID NOT TAKE THE PATH: STATE 216, TO 042, TO 141.\ 
6366 062773 EM205: 
06277 124 110 105 -ASCIZ \THE FPS WAS BAD AFTER SUBD (RO),ACO.\ 
6367 063040 EM206: 
06 123 125 102 -ASCIZ /SUBD (RO),ACO PRODUCED A BAD RESULT. / 
6368 063105 123 125 102 EM207: .ASCII ‘SUBD (RO) -ACO PRODUCED A BAD RESULT. 
6369 063151 200 124 110 eASCIZ <CRLF>*THE XOR OF THE SIGN BIT FAILED ” STATE 024.' 
6370 063227 101 104 104 €M210: .ASCIZ ‘ADDD (RO),ACO FAILED IN THE NORMALIZE FLOWS.* 
043267 EM211=EM5 
6372 043323 EM212=EM6 
6373 043355 EM213=EM7 
6374 
oer? ;DATA HEADERS 
6377 063304 040 040 124 DH: ASCII] ‘_ TEST. "<TAB>' PC OF CALL. *<TAB>'PC OF ERROR. 
6378 063344 011 127 122 -ASCIZ <TAB>' WROTE. *<TAB> READ. *<TAB>* EXPECTED. 
6379 063374 040 040 124 DH2: ASCII * TEST.'<TAB>'PC OF CALL. *<TAB> "PC OF ERROR." 
3434 101 116 104 -ASCIZ ‘AND BAD DATA. '<TAB>'OR BAD DATA.* 
6381 063467 04 124 DH3: -ASCII * TEST. *<TAB>'PC OF CALL. '<TAB>'PC , OF ERROR. * 
6382 063527 011 122 105 -ASCIZ <TAB>'READ PSW, *<TAB>"EXPECTED PSwW 
6383 063560 040 040 124 DH4: ASCII ‘ TEST. *<TAB>' PC OF CALL. "<TAB>*PC OF ERROR. * 
063620 011 127 122 -ASCIZ <TAB>'WROTE FPS.*<TAB>'FPS AFTER CFCC. 
6385 063654 040 040 124 DHS: eASCIZ ' TEST."<TAB>*PC OF CALL.‘<TAB>*PC OF TRAP." 
6386 063654 DH6=DH5 
6387 063654 DH7=DH5 
6388 063654 DH10=DH5 
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FLAG RESET AND CONSOLE TEST ROUTINE SEQ 0160 


DH11=DH5 


* TEST. "<TAB>'PC OF CALL. *<TAB>'PC OF ERROR." 
<TAB>'OP CODE. FPS. 

* TEST. '<TAB>*PC OF CALL. my 7 OF ERROR. * 

<TAB>'GOT FPS. '<TAB>*EXPECTED F 

' TEST. "<TAB>'PC OF CALL. *<TAB> PC OF TRAP.* 
<TAB>'PC OF STST.*<TAB>'READ FEC. 


"FAILED TO CORRECTLY SET FPS.' 
“FAILED TO CORRECTLY SET FEC TO 000002. *<CRLF > 
* TEST. "<TAB>'PC OF CALL. che. PC OF ERROR. , 
<TAB>'PC OF STST.'<TAB>'READ FEC. 
" TRAPPED TO 244. FLOW WENT FROM STATE 554 TO STATE 430." 
<CRLF>" INSTEAD OF FROM STATE 554 TO STATE 432." 
.*<TAB>'*PC OF CALL.‘<TAB>*PC OF ERROR. '<TAB> 
. *<TAB>*PC OF CALL.'<TAB>'PC OF ERROR." 
<TAB>'GOT RO. '<TAB>'EXPECTED RO.' 
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" TEST. "<TAB>'PC OF CALL.'<TAB>'PC OF 

. <TAB>'RO (TARGET LOCATIONS FOR OUTPUT).' 
DH34=DH33 
DH35=DH33 


6411 
6412 
6413 
6414 
6415 
6416 
6417 
6418 
6419 


*  TEST."<TAB>'PC OF CALL.*<iAB>*PC OF 
<TAB>'RO (TARGET LOCATIONS FOR OUTPUT).* 


"ERROR SUMMARY." 
* TEST. *<TAB>'CALL AT PC." 


" TEST. *<TAB>'PC OF CALL.'<TAB>‘PC OF 
<TAB>'WITH FD.* 


*  TEST."<TAB>*PC OF CALL.*<TAB>'PC OF 


! DH63=DH54 
065217 122 $ ‘ ee IN AN ODD ADDRESS TRAP TO 4." 
<CRLF > : F 
04 * TEST. *<TAB>'PC OF CALL. *<TAB>*PC OF ERROR. 
065 326 -AS <TAB>'"GOT PC. '<TAB>'EXPECTED PC." 
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FLAG RESET AND CONSOLE TEST ROUTINE SEQ 0167 | 
6446 065156 DH66=DH54 wd 
6447 063654 DH67=DH5 alt 
6448 063654 DH70=DH5 tall 
6449 064504 DH71=DH25 we 
6450 064546 DH72=DH26 H( 
6451 065156 DH73=DH54 H( 
6452 063654 DH74=DH5 H( 
6453 063654 DH75=DH5 H( 
6454 064504 DH76=DH25 H{ 
6455 064546 DH77=DH26 H{ 
6456 065156 DH100=DH54 H{ 
6457 063654 DH101=DH5 H( 
6458 064546 DH102=DH26 HE 
6459 064504 DH103=DH25 Ht 
6460 065156 DH104=DH54 HS 
6461 063654 DH105=DH5 H! 
6462 064546 DH106=DH26 H’ 
6463 064504 DH107=DH25 H' 
6464 065156 DH110=DH54 H" 
6465 064504 DH111=DH25 H' 
6466 065354 124 110 105 DH112: .ASCII ‘THE (BUT FSRC) FORK FAILED. '<CRLF> He 
6467 065410 103 117 116 -ASCII "CONTROL WENT FROM STATE 762 TO STATE 627.° H 
6468 065461 200 111 116 ASCII <CRLF>"INSTEAD OF FROM STATE 762 TO STATE any *<CRLF> He 
6469 065532 040 040 124 -ASCIZ TEST. "<TAB>'PC OF CALL.'<TAB>'PC OF ERR H! 
6470 064504 DH113=DH25 H¢ 

71 065354 DH114=DH112 , 

6472 065573 124 110 105 DH115: .ASCII ‘THE (BUT FSRC) FORK FAILED RESULTING IN AN ODD ADDRESS TRAP TO 4.° 
6473 065674 200 103 117 -ASCII <CRLF>*CONTROL WENT FROM STATE 762 TO STATE 627.'<CRLF> 
6474 065747 111 116 123 ASCII ‘INSTEAD OF FROM STATE 762 TO STATE 627.'°<CRLF> 
6475 066017 040 040 124 -ASCIZ * TEST. *<TAB>'PC OF CALL.‘<TAB>‘PC OF TRAP." 
6476 065573 DH116=DH115 
6477 063774 DH117=DH17 
6478 066057 040 040 124 DH120: .ASCII ' TEST."<TAB>'PC OF CALL.'<TAB>'PC OF ERROR." 
6479 066117 011 107 117 -ASCIZ <TAB>'GOT FEC. "<TAB>"EXPECTED FEC.° 
6480 063654 DH121=DH5 
6481 065104 DH122=DH50 
6482 065104 DH123=DH50 
6485 063774 DH124=DH17 
6484 063774 DH125=DH17 
6485 063654 DH126=DH5 
6486 065156 DH127=DH54 
6487 066057 DH1 30=DH120 
6488 065156 DH131=DH54 
6489 065156 DH132=DH54 
6490 066147 106 101 111 DH133: ASCII "FAILED TO PRODUCE THE CORRECT RESULTS. "<CRLF > 
6491 066216 040 040 124 -ASCIZ TEST. °<TAB>'PC OF CALL.'<7AB>'PC OF ERROR.* 
6492 066147 DH134=DH133 
6493 066147 DH135=DH1 33 
6494 066147 DH1 36=DH1 33 
6495 066257 120 12 117 DH137: ry Mites ss THE CORRECT RESULT BUT FAILED TO ze THE FPS CORRECTLY.’ ’ 
6496 066557 040 040 124 aot TEST. *<TAB>'PC OF CALL.'<TAB>'PC OF ERROR 
6497 066417 011 10 117 ASCIZ <TAB>' ebt FPS. °<TAB>*EXPECTED FPS.° 
6498 066257 DH140= puis? 
6499 066257 DH141=DH137 
6500 066257 DH142=DH1 37 
6501 066147 DH14 3=DH1 33 
6502 066147 DH144=DH1 33 
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6503 066257 DH145=DH1 37 

6504 066257 DH146=DH1 37 

6505 065156 DH147=DH54 

6506 066447 120 117 122 DH150: .ASCII ‘OR OF SIGN BIT FAILED. *<CRiF> 
6507 066477 040 040 124 -ASCIZ ' TEST. °<TAR>'PC OF CALL.*<TAB>*PC OF FRROR.' 
6508 066257 DH151=DH137 

6509 066147 DH152=DH1 33 

6510 066257 DH153=DH137 

6511 066540 040 040 124 DH154: .ASCIZ ‘ TEST. °<TAB>'PC OF CALL. '<TAB>'PC OF TRAP." 
6512 066540 DH155=DH154 

6513 065156 DH156=DH54 

6514 065156 DH157=DH54 

6515 065156 DH160=DH54 

6516 065156 DH161=DH54 

6517 C65156 DH162=DH54 

6518 065156 DH163=DH54 

6519 063774 DH164=DH17 

6520 063774 DH165=DH17 

6521 065156 DH166=D1i54 

6522 065156 DH167=DH54 

6523 065156 DH170=DH54 

6524 065156 DH171=DH54 

6525 065156 DH172=DH54 

6526 065156 DH173=DH54 

6527 065156 DH174=DH54 

6528 065156 DH175=DH54 

6529 065156 DH176=DH54 

6530 065156 DH177=DH54 

6531 065156 DH200=DH54 

6532 065156 DH201=DH54 

6533 065156 DH202=DH54 

6 065156 DH203=DH54 

6535 065156 DH204=DH54 

6536 063774 DH205=DH17 

6537 065156 DH206=DH54 

6538 065156 DH207=DH54 

6539 065156 DH210=DH54 

6540 066600 046 040 124 DH211: .ASC]Z ‘ TEST. *<TAB>'PC OF CALL.'<TAB>°PC OF TRAP. '<TAB>'FEC.’ 
6541 063654 DH212=DH5 

6542 063654 DH213=DH5 

6543 

6544 

6545 sDATA FORMATS: 

6547 066645 004 000 005 DF: -BYTE 4,0,5.0.5.0.0.0 

6548 066655 004 000 005 DF2: -BYTE 4,0,5.4.5.0,5.,0 

6549 066665 004 000 005 DF3: -BYTE 4.0,5.0,5,0,5,0 

6550 066665 DF 4=DF3 

6551 066675 004 000 005 DFS: vTe 4,0,5,0,5.0.5.11.5,0,5,0 


pa? we 


| 
SEQ 0162 | 


Ol 
Ol 
Ol 
ol 
Ol 
Ol 
Ol 
Ol 
Ol 
Ol 
Ol 
Ot 
Ol 
Ol 
Ol 
Ol 
Ol 
Ot 
Ol 
Ol 
Of 
Of 
Ol 
Ol 
O 
Ol 
oO 
Ol 
0 
0 
0 
0 
re 
0 
0, 
0 
O 
C' 
Or 
0 
8) 
a 
P| 
P| 
P| 
P' 
P| 
P| 
PI 
P| 
P| 
P| 
P| 
Pp 
P| 
P| 
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6553 366675 DF O=DFS 


— 


SEQ 0163 





COO OOOO OOOO OOP OOO OOOO POO OOOO OOOO OO OC CCC CC RAH HHH HHH HHH OU 






6589 


067421 
067445 


067463 
067472 


—_ 067510 


067517 
067541 


CKFPAAO FPIIF FLTG PNT PRT A 
FLAG RESET AND CONSOLE TEST ROUTINE 


000 
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005 


005 
005 


D : ‘ 
DF 31=DF 26 
DF 32=DF 27 
DF 33: BYTE 
DF 34: BYTE 
DF 35=DF 34 
DF 36=DF 34 
DF 37=DF 34 
DF4O: 


DF57=DF 54 


DF 76=DF 70 
DF 77=DF 72 


4 


-4,5,11,5.11,5,5.4,0,5,0,5.0,0 


area FR Ro, 
560505515165 1G 


4, e e @ e e e e e e e e 
11,5,5,5,4,0,5,0,5.0,5,0 

6.0.5.0.9 0d eDedadeMed cel 0 ch s5e5s5050%e5e4 
517505050400 5005 555656 5 80555656 54d 
5°11.5.5.5.4.0,5.0.5.4.5,5,5.5.3,5,5,5,553 
205050558555 belo elo bl Br ke lr bel 855 354 54543 
h.O.3cBetsdetctarsteteta 

4.0.3.0 30) ledotedeodo@etotodedcdadetedeh 
6B,3 Bedcl ledetetadetetates 

4,,0..5.0,5.0.0 

4°0°5°0.5.5.5.5,3.5.5.545.3 

4,0.5,0.5.0.0 


4.0,5.0,5.5.5,5.415 4415055505545 50S 
4,0,5.0.5.0.0 


SEQ 0164 








oh oth Oh oh th th th th th th th th th th th th th th th th ch oh na 


amaec mn 






067550 


1 
067554 
3 


067605 
067625 


067651 


5 
067661 
7 


067665 
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FLAG RESET AND CONSOLE 


000 


000 


000 
000 


000 


600 


000 


005 


005 


005 
005 


005 


005 


005 


J.13 
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TEST ROUTINE 


DF 


WW WA 


AWD WNW NNWNWNWNWNWNNANWNANWDOWAAOWD --—rD-ON 


—W< NWW S&S < NW NWA NIWA NN NN << AWWW << 


go vo°c9Vv°I97g990C070€7 
ARRAN 


wea 
ee 4 
— —_ — 
mn m mn 


4 
mn 


~] 
> 
— 


BEBE SOD -S EAL LAD IDS SSS oS oS 


punnininin ht tt ies 


A=] 
n~y 


~ 
eal 
ee ee ed ed od 
on 
m 


— —2 6 —_ 3 3 me ed ed ed ed od od —_— —32 3 © — 
“4 
mm 


WRI DNAMNEWD 9 NAMNEWR 


ONY 







4,0.5.0 


4..0,,35..0,.5.0.0,5..5..5..5..8 5 cb 555 3.050%, 55b.5..905.5 


4.0,5.0.5,5.5,5.5.5,3.3.565.565 
$0.5 005.155, Fed oS etc detetatetetetetet 


4,0,5.0,5.,0,5.0 


4.0.5.0 


4,6,,$..0,5..5,5..8 cPedeSeb ote D stad ctetotet 


—_-—. — 5 


C 
Ss 
S 
A 
A 
A 
A 
A 
A 
A 
A 
A 
A 
A 
A 
A 
A 
A 
A 
A 
A 
A 
A 
A 
A 
A 
A 
A 
A 
A 
A 
A 
A 
A 
A 
A 
A 
A 
A 
A 
A 
A 
A 
A 
4 
A 
A 
A 
A 





CKFPAAQ FP1IF FLTG PNT PRT A 
FLAG RESET AND CONSOLE 


6685 067711 
6686 


6709 070170 
6711 
6712 070202 
6713 
6714 070222 


6725 070352 


MACRO M1111 
TEST ROUTINE 
DF 171=DF 161 
DF 172=DF 133 
DF 173=DF 133 
DF 174=DF 161 
- DF 175=DF 161 
DF 176=DF 133 
DF 177=DF 133 
DF 200=DF 133 
DF 201=DF 133 
DF 202=DF 133 
DF 203=DF 133 
DF 204=DF 133 
DF 205=DF3 
DF 206=DF 133 
DF 207=DF 133 
DF 210=DF 133 
000 005 DF211: .BYTE 
DF212=DF 211 
DF213=DF211 
:DATA TABLES: 
001234 040446 DT1: WORD 
001244 000000 “WORD 
001234 040446 DT2 “WORD 
1234 040446 DT3 “WORD 
001242 000000 “WORD 
DT4=DT3 
001234 040446 DTS: — .wWORD 
040565 001240 “WORD 
001234 040446 DT6: {WORD 
DT7=DT6 
DT10=DT6 
DT11=DT6 
001252 040647 DT12:  .WORD 
001246 041023 “WORD 
001252 041106 “WORD 
001240 001242 “WORD 
001252 040647 DT13: [WORD 
040446 001240 “WORD 
DT14=DT6 
DT15=DT6 
001234 040446 DT16: D 
DT17=DI3 
1234 040446 DT20: — .WORD 
001242 000000 “WORD 
1234 040446 DT21: ‘WORD 
001313 DT22: WORD 
1234 040446 “WORD 
001242 000000 “WORD 
001234 040446 DT23: ‘WORD 
001242 000000 “WORD 
DT24:  :WORD 
001234 040446 “WORD 
001242 000000 “WORD 
001234 040446 DT25: [WORD 
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4,0.5,0,5.0 


STMPO. STP. STAB, STMP2, STAB, $TMP3 
$TMPO.$TMP1 .$TAB, AERFLG,$TAB, $TMP2,$TAB, $TMP3,0 
$TMPO.$TMP1.$TAB. $TMP2, $TAB, $IMP3 

$TAB, $TMP4 ,0 


STMPO,,STMP1,$TAB,STMP2,LFIEX1, $TMP21,LFIEX2 
$TMP20,FPSMS ,STMP3,FECMS,STMPS ,0 
$TMPO, $TMP1,$TAB, $TMP2,LFIEX1,$TMP21 LF IEX2,$TMP20,0 


$THE ,$TMP10,NOOP1 ,NOOP15 ,NOOP2, $TMP5 
NOOP3, $TMP6 .NOOP4 NOOP2 $TMPS ,NOOP3,$TMP7,NOOPS , $TMP11 
NOOP10,$TMPO,$TMP1,$TAB, STMP2 


1,NOOP11,NOOP10,$TMPO,$TMP1,$TAB 
STMP2, STAB, SiMe, $TMP4 ,0 


STMPO,STMP1,$TAB,STMP2,$TAB,STMP5 ,STMP3,0 
aly as .$TAB,STMP2, STAB, STMP3 


$T 

sTMPO.ST™ STMP1 ,$TAB, STMP2,0 

$160, STH ,$TAB, $TMP2,$TAB, STMP3 
sTmPO. $TMP1.$TAB.$TMP2,$TAB,$TMP3 
STAB .STMPS, 6 


ILLMS 
STH°O,$7mP1 $TAB,STMP2,$1AB, STMP3 
STNEO. $TMP1 STAB, SCRLF .MS1,MS3,$TMP3,MS4,$TMP4,$CRL5 


SEQ 0166 


ie 


= 


> 


A 
A 
A 
A 
4 
A 
A 
A 
A 
A 
A 
A 
A 
A 
4 
A 
A 
A 
4 
4 
A 
A 
A 
4 
A 
A 
A 
A 





CKFPAAO FP11F FLTG PNT PRT 


FLAG RESET AND CONSOLE 


6726 070376 


6732 
6733 070552 
6734 070566 
6735 


6736 
6737 070572 
6738 070606 


6746 

6747 070722 
6748 070732 
6749 070746 
6750 070754 
6751 070770 
or 3e 071012 


6754 071032 


vw 
oO 


5 
6766 071276 
6767 071312 


79 
6780 071412 
ore) 071426 


071412 


a 


S8Ssssss 2 
MNRIWNWWPWG 
dana 


001234 
000000 


MACRO M1311 
ROUT INE 
: 


040446 
042620 
040446 


040446 
042350 


040446 


DT26:  .WORD 


D127:  .WORD 


DT30: . WORD 


DT31=DT26 
DT32=DT27 
D133: . WORD 
WOR 
.-WOR 
DT34: WORD 
.- WORD 
~ WORD 
DT35=DT 34 
DT36=DT34 
DT37=DT34 
DT40=DT33 
DT41: . WORD 
. WORD 


~ WORD 
DT42: WORD 
. WORD 


. WORD 
DT43=DT42 
DT44: . WOR 

. WOR 
DT45: . WORD 

. WOR 


. WOR 
DT46: . WORD 


DT47:  .WORD 


. WORD 
DTS0=DT34 
DT51: . WORD 


. WORD 
DT52=D147 
DT53: .WORD 


“WORD 

DT54: WORD 

«WORD 
DT55=D147 


DI63=DT54 
DT64: =. WORD 


. WORD 
DT65=DT64 
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STMP4 ,SCRLF .MS2.MS3,$TMP5 .MS4, $TMP6,$CRLF.$TMPS,0 

$TMPO.$TMP1.$TAB, STMP2,$TAB, STMP3,$TMP4, SCRLF 

MS6,$CRLF .MS7,$TMP5 .MS10,$1MP6, SCRLF 

MS11,$CRLF .MS?,$TMP5.MS10, sTmP? 0 
$TMPO, $TMP1, STAB, STMPD. $TAB 


MP3 
STMP4.SCRLF .MS12,$CRLF .MS7, Sines, MS10,$TMP7,$CRLF .MS13,0 


MS15,$TMP20,$CRLF .MS14,$CRL 
$T STMP1 STAB. STMP2. STAB, STMPS 
STMP4 ,0 


STMPO,STMP1,$TAB, $TMP2,$TAR, STMP3 

SCRLF .MS1,MS3,$TMP4 .MS4,$TMP5, SCRLF .$TMP6, $CRLF 
MS2, MSS. $TMP4-MS4,$TMPS.S$CRLF .$TMP4.0 
STMPO,$TMP1,$TAB, $TMP2,$TAB, STMP3 

SCRLF .MS6,$CRLF .MS7,$TMP5 yh STMP6, $CRLF 
MS11,$CRLF .MS7,$TMP5 ,.MS10.$TMP7,0 


$TMP20, $CRLF ,DH3,$CRLF 
$TMPO, $TMP1,$TAB.STMP2, $TAB, S$TMP3 

$TAB, $TMP4 0 

STMPO, $TMP1 STAB, $TMP2, STAB, STMP3 

SCRLF .MS6,$CRLF .MS7,$TMP5,MS10, STMPC, ,STMPIS, $TMP10 
SCRLF .MS11,$CRLF ,.MS7,$TMP5 .MS10,$TMP7,0 


MS17,$TMPS,SCRLF .MS20,. $CRLF .STMPO,STMP1 ,$TAB, STMP2 
SRL MS1 mse SCRLF, STMP3. $CRLF MS2 MS21 , SCRLF .STMP4,0 
MS17,$TMP5, $CRLF .MS24,$CRLF,$TMPO, STMP1 ,$TAB, $TMP2, STAB 
ae $CRLF ye mst ScRLF: *$TMP3,S$CRLF 
MS23,MS21,$CRLF,$TMP 

STMPO, STMP1, SCRLF ns25, MS30,$TMP2,.MS31,$TMP3 

MS32,$TMP4 ,MS33,$ wes MS34,$TMP6, $CRLF .MS26 

MS30. lam °MS31 

MS32.$™MP11 mess aah MS34,$TMP13,0 
$TMPO,$TMP1.$TAB.$TMP2, $CRLF .MS12,MS7,$TMP3,MS10 
$TMP4..$CRLF .MS13.0 


STMPO,STMP1,STAB,STMP2, STAB, STMPS 
SCRLF -MS25,.MS27,$TMP4, $CRLF .MS26,MS27,$TMP5 ,0 


SS etal teeta: sttith 


TMP4, 
$TMPO,.STMP1 STAB, STMP2,SCRLF .MS1,MS21,$CRLF .STMP3 
SCRLF .MS2,MS21,$CRLF ,$TMP3,0 


STMPO,$TMP1,$TAB,STMP2, STAB, SIMP3 
$TMP4 ,0 


SEQ 0167 


¢ 
S 
$ 
A 
4 
4 
A 
A 
A 
A 
A 
A 
A 
A 
4 
A 
A 
4 
A 
A 
A 
A 
A 
a4 
A 
A 
A 
A 
A 
A 
4 
A 
A 
4 
A 
A 
A 
A 
A 
A 
A 
a 
a 
A 
E 
E 
E 
E 
E 
E 
E 
E 
E 
E 





ores 071454 041764 001246 001313 WORD MS10,$TMP6,$CRLF .MS11,$CRLF .MS7,$TMP5,MS10,$1MP7,0 
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FLAG RESET AND CONSOLE TEST ROUTINE SEQ 0168 5 
s 
6783 071354 D166=DT54 F 
6784 070244 DT67=DT21 4 
6785 071432 001232 001234 040446 DT70: .WORD $TMPO,$TMP1,$TAB,STMP2,SCRLF .MS6,SCRLF .MS7,$TMP5 g 
: 8 
6787 071432 DT71=DT70 F 
6788 071500 001232 001234 040446 DT72: _.WORD $TMPO,STMP1,$TAB,$TMP2,$TAB,STMP3, STMPS ,0 : 

6789 071354 DI73=DT54 
6790 070244 DT74=DT21 g 
6791 071432 DT75=DT70 E 
6792 071432 DT76=DT70 E 
6793 071500 DI77=DT72 E 
6794 071354 DT100=DT54 g 
6795 071432 DT101=DT70 E 
071432 D1102=D171 E 
6797 071432 DT103=DT70 F 
6798 071354 DT104=DT54 E 
6799 071432 DT105=DT70 F 
071500 DT106=DT72 g 
6801 071432 DT107=DT70 E 
6802 071354 DT110=DT54 E 
6803 071520 001232 001234 040446 DT111: .WORD $TMPO,$TMP1,$TAB,$TMP2,0 E 
6804 071520 DT112=DT111 E 
6805 071520 D1113=D1111 E 
071520 DT114=DT111 E 
6807 071520 DT115=DT111 E 
6808 071520 DT116=DT111 E 
067764 DT117=DT3 E 
6810 7764 DT120=DT3 E 
6811 071244 DT121=DT47 E 
6812 070650 DT122=DT34 E 
6813 071276 DT123=DT51 E 
6814 071532 001232 001234 040446 DT124: .WORD $TMPO,STMP1,$TAB,STMP2,$TAB, STMP3,STMPG,SCRLF E 
6815 071552 041732 001313 041750 “WORD MS6,$CRLF ,MS7, STMPS MS10,$TMP6, SCRLF E 
6816 071570 041777 001313 041750 “WORD MS11,$CRLF .MS7,$TMP5 .MS10,$TMP7, $CRLF .MS37.SCRLF .$TMP10,0 E 
6817 071532 DT125=DT124 E 
6818 071520 DT126=DT111 E 
6819 071520 DT127=DT111 E 
6820 067764 DT130=DT3 E 
6821 071616 001232 001234 040446 DT131: .WORD $TMPO,STMP1,S$TAB,STMP2,$CRLF .MS37,SCRLF .STMP3 E 
6822 071656 001313 042724 001315 WORD SCRLF .MS4O,$CRLF .$TMP4 .SCRLF .MS415,$CRLF ,$TMP5S,0 
6824 071660 001232 001234 040446 DIT133: .WORD $TMPO,STMP1,STAB,STMP2,SCRLF.MS41,$CRLF ,STMP3 E 
6825 071700 001313 043004 001313 “WORD $CRLF.MS42,$CRLF .$TMP4.$CRLF .MS43.$CRLF .$TMP5 E 
6826 071720 001313 043037 001313 “WORD $CRLF.MS44.$CRiF .$TMP6.0 E 
2 071 D1134=DT133 E 
6828 071660 01135=D1133 E 
6829 071660 DT136=D1133 E 
6830 071732 001232 001234 040446 DT137: .WORD $TMPO,S$TMP1,$TAB,STMP2,$TMP10,$TAB,SIMP11 ,0 E 
6831 071732 D1140=DT137 E 
6832 071732 DT141=D1137 E 
6833 071732 DT142=DT 137 E 
6834 071660 D1143=DT133 E 

6835 DIT144=DT133 

071732 D1145=DT137 
6837 071732 D1146=D1137 


68 
6839 071660 C1T150=DT133 
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( 
FLAG RESET AND CONSOLE TEST ROUTINE SEQ 0169 < 
4 
6840 071732 DT151=D1137 Fi 
6841 071660 01152=DT133 E 
6842 071732 D1153=DT137 ; 
6863 071752 001232 001234 040446 DT154: .WORD $TMPO,S$TMP1,$TAB,$TMP2,0 E 
6844 071752 DT155=DT154 E 
6845 71660 DT156=DT133 E 
6846 071660 DT157=D1133 é 
6847 071660 DT160=DT133 E 
6848 071660 DT161=D1133 E 
071660 DT162=D1133 E 
6850 071660 DT163=DT133 E 
6851 067764 T164=DT3 E 
6852 067764 DT165=DT3 E 
6853 071660 DT166=DT133 E 
6854 071660 DT167=D1133 E 
6855 071660 DT170=DT133 E 
6856 071660 DT171=DT133 E 
6857 071660 DT172=DT133 E 
6858 071660 D1173=DT133 E 
6859 071660 DT174=DT133 E 
07166C DT175=DT133 E 
6861 071660 DT176=DT133 E 
071660 DT177=DT133 E 
6863 071660 DT200=DT133 E 
071660 DT201=DT133 é 
6865 071660 DT202=DT133 ( 
071660 DT203=DT133 
6867 071660 DT204=DT133 
067764 DT205=DT3 
071660 DT206=DT133 
6870 071660 DT207=DT133 
6871 071660 DT210=D1133 
6872 071764 001232 001234 040446 DT211: .WORD $TMPO,$TMP1,$TAB,$TMP2,$TAB,STMP3,0 
6873 072002 001232 001234 040446 DT212: WORD $TMPO.$TMP1.3TAB.S$TMP2.0 
6874 072002 DT213=DT212 
5875 
5876 
6877 
6878 
6879 512345 


6880 000001 - END 
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SYMBOL TABLE SEQ 0170 
AADATO 026222 ADDW12= 000000 A6é 094512 BERR1 004742 CCP3 030010 
026322 ADDW13= 000000 A7 536 BITO = 000001 CCP4 030020 
AAERRO 025654 ADDW14= 000000 BBDATO 264 BITOO = 000001 CCPS 0300 
AAERR1 025742 ADDW15= 000000 ONE 031414 BITO1 = 000002 CCP6 0 0 
AAERR2 025776 ADDW2 = 000000 BBERO 030752 BITO2 = 000004 CCP7 3005 
AAERR 26032 ADDWS = 000000 BBER1 031012 BIT03 = 000010 cc1 026326 
AAERRG 026042 AD = BBER10 030772 BIT04 = 000020 CC10 026542 
AAERRS 026076 ADDWS = 000000 BBER11 031026 BITOS = 000040 cc11 026552 
026132 = BBER2 031050 BITO06 = 000100 CC12 0265 
AAERR7? 026166 ADDW7 = 000000 BBERS 031066 B1T07 = 000200 CC13 026572 
AAER10 025750 = 000000 BBERS 031122 BITO8 = 000400 CC14 02662. 
AAPATO 026232 ADDW9 = 000000 BBERSO 031136 BITO9 = 001000 Cci5 02664 
AAPAT1 026242 ADEVCT= BBERS 031156 BIT! = 2 CC16 02 
AAPAT2 026252 ADEVM = BBER6 031174 BIT10 = 002000 CC17 026676 
AAPATS 0262 ADONE 004654 BBER? 031230 BIT11 = 000 CC18 026704 
AAPATS 026272 AENV = BBER8 031246 BIT12 = 010000 CC19 02€716 
AAPATS 026302 AENVM = BBPATO 031274 BIT13 = 020000 CC2 02635 
AAPAT6 $= 026312 AERFLG 004544 BBPAT1 031304 BIT14 = 040000 cC20 026746 
AAI 025274 AERR1 004546 BBPAT2 031314 BIT15 = 100000 CC21 026772 
AA10 25410 AERR2 004560 BBPATS 031324 BIT2 = 4 CC22 0270i2 
AA11 025440 3 004612 BBPAT4 031334 BITS = 1 CC23 C27022 
AA12 025442 AFATAL= 000000 BBPATS 031344 BIT4 = 000020 CC24 027030 
AA13 025460 AMADR1= 000000 BBPAT6 031354 BITS = CC25 92704 
AA14 00 AMADR2e= 000000 BBP10 031374 BIT6 = 000100 CC26 027072 
AA15 025520 AMADR3= 000000 BBP11 031404 BIT7 = 200 CC27 027114 
AA16 025526 AMADR4= 000000 BBP7 031364 BIT8 = 000400 CC28 027134 
AA17 025532 AMAMS1= 000000 BB1 30114 BIT9 = 001000 CC29 027144 
025332 AMAMS2= 000000 BB10 030270 BPTVEC= 000014 C3 02 
025536 AMAMS3= 000000 BB1i 030310 B 4 Cc30 027152 
AA21 025540 = 000000 BB12 030320 Be 004670 cc31 027164 
AA22 025572 AMSGAD= 000000 BB13 030326 B 00: CC32 027214 
AA23 025574 AMSGLG= 000000 8B14 030340 CCDATO 027750 CC33 36 
AA24 025614 AMSGTY= 000000 BB15 030370 C 030110 CC34 027256 
AA25 025634 AMTYP1= 000000 BB16 030414 CCERO 027312 cc35 66 
AA26 025642 AMTYP2= 000000 BB17 030424 CCER1 027346 CC36 027274 
AA27 25646 AMTYP3= BB2 030152 CER10 02766 CC37 06 
AAS 025334 AMTYP4= 000000 BB20 030436 CCER11 027676 CC4 026420 
AAS 025352 APASS = 000000 BB21 304 CCER12 027714 ccs 026430 
AAS 02 = BB22 030512 CCER13 027732 CC6 02 
254 APTCSU= 000040 BB23 030532 CCER 04 CC? 026450 
AA7 025406 = BB24 030542 CCER22 027420 CC8 026500 
SE = APTSIZ= 000200 BB25 030550 CCERS 027442 cCc9 026522 
ACDwW1 = 000000 TSPO= 000100 BB26 030562 CCER4 027460 CDONE 
ACDW2 = 000000 ASWRE G= BB27 030612 CCER44 027474 CERR1 005416 
AC = ATESTN= 000000 BB3 030156 ERS 027516 CERR2 005514 
ACO = AUNIT = 000000 BB30 030634 CCERSO 027362 CERR3 005614 
AC1 =%000001 AUSWR = 000000 8831 030644 CCERSS 027532 CERR4 5636 
AC2 =%000002 AVECT1= 000000 BB32 030656 CCER6 027552 CFCC1 041400 
AC3 =%000003 AVECT2= 8833 030706 CCER? 027606 CKSWR = 104406 
ACS = 004462 BB34 030730 CCER8 027624 CNT = 000214 
ACS =%000005 Al 004334 BB35 030740 CCER9O 0273350 CPC 005660 
AC6 = All 004334 BB4 030174 CCPO 027760 CPSPUR 040266 
AC7 | =%000007 Al2 004350 BBS 030204 CCP1 027770 CPTWO 040304 
= 000000 A2 0044 BB6 030216 CCP10 03006 C = 15 
= 000000 A3 004412 BB7 030246 CCP11 030070 CRLF = 200 
ADDW10= 000000 AG 004460 BDONE 004756 CCP12 030100 C1 004772 
ADDW11= 000000 AS 004464 BERR 004712 CCP2 030000 C15 005020 
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C 005040 DD24 032142 DF123 067625 DF 23 067014 DH105 = 063654 
C25 005054 DD25 032162 DF134 = 067625 DF 24 067024 DH106 = 064546 
C 005076 DD26 032172 DF135 = 067625 DF 25 067033 DH107 = 064504 
C35 005126 DD27 32200 DF136 = 067625 DF 26 067057 DH11_ = 063654 
C 005150 DD3 031472 DF137 067651 DF 27 067104 DH110 = 065156 
C45 005162 DD30 032212 DF14 = 0666 oF DH111 = 064504 
C$ 5204 DD31 032242 DF140 = 067651 DF 30 067124 DH112 065354 
C55 005232 DD32 032264 DF141 = 067651 DF31 = 067057 DH113 = 0645 
C 005252 DD33 032304 DF142 = 067651 DF32 = 067104 DH114 = 065354 
C65 5266 DD34 032314 DF143 = 067625 DF 33 067140 DH115 065573 
C 005310 DD35 032322 DF144 = 067625 DF 34 067166 DH116 = 065573 
C75 D36 03234 DF145 = 067651 DF3S = 067166 DH117 = 063774 
C DD37 032370 DF146 = 067651 DF36 = 067166 DH12 = 
C85 005374 DD38 032412 DF147 = 067625 DF37 = 067166 DH120 06605 
DDDATO DD39 032432 DF15 = 75 DF4 == 5 DH121 = 063654 
033410 DDS 031512 DF150 = 067625 DF4O 067212 DH122 = 065104 
DDERO 032472 DD40 032442 DF151 = 067651 DF41 067246 DH123 = 065104 
DDER1 3251 DD41 032450 DF152 = 067625 DF42 067254 DH124 = 063774 
DDER10 033126 DD42 DF153 = 067651 DF43 = 067254 DH125 = 063774 
DDER11 033164 DDS 031522 DF154 067661 DF 44 067302 DH126 = 063654 
DDER12 033222 DD6 031530 DF155 = DF45 067325 DH127 = 065156 
DDER2 032546 DD7 031546 DF 156 = 067625 DF46 067352 DH13_ = 
DDER3 2604 208 031576 DF157 = 067625 DF47 067404 DH130 = 57 
DDERS 032642 DERR1 DF 16 DF5 75 DH131 = 065156 
DDERS 032700 DERR2 006100 DF 160 = 067625 DF50 067421 DH132 = 065156 
DDER6 32736 DF 1 5 DF 161 766 DF51 067445 DH133 066147 
DDER? 032774 DF1O = 7 DF162 = 067625 DF52 067404 DH134 = 066147 
DDER8 033032 DF100 = 067472 DF163 = 067665 DF53 067463 DH135 = 066147 
DDER9 033070 DF101 = 067517 DF 164 = 066665 DF54 067472 DH136 = 066147 
DDISP = 177570 DF102 = 067541 DF165 = 066665 DF55 = 067404 DK137 066257 
DDONE 006124 DF103 = 067517 DF166 = 067625 DF56 = 067463 DH14 = 063654 
DDPO 033270 DF 104 = 067472 DF167 = 067625 DF57 = 067472 DH140 = 066257 
DDP1 033 DF105 = 067517 DF17 = 066665 DF6 = 75 DH141 = 066257 
DDP2 033310 DF 106 = 067541 DF170 = 067665 DF60 = 067463 DH142 = 06625 
DDP3 033320 DF107 = 067517 DF171 = 067665 DF61 = 067472 DH143 = 066147 
DDP4 033330 DF11 = 75 DF172 = 067625 DF62 = 067472 DH144 = 066147 
DDPS 03334 DF110 = 067472 DF173 = 067625 DF63 = 067472 DH145 = 066257 
DDP6 033350 DF111 067550 DF174 = 067665 DF 64 067510 DH146 = 066257 
DDP7 033 DF112 = 067550 DF175 = 067665 DF65 = 067510 DH147 = 065156 
DDP8 033370 DF113 = 067550 DF176 = 067625 DF66 = 067472 DH15 = 06365 
0334 DF114 = 067550 DF177 = 067625 DF67 = 066776 DH150 06644 
DD1 031420 DF115 = 067550 DF2 55 DF7 = 066675 DH151 = 066257 
DD10 031620 DF116 = 067550 DF 20 7 DF 70 067517 DH152 = 066147 
DD11 031630 DF117 = 5 200 = 067625 DF71 = 067517 DH153 = 066257 
DD12 03164 DF12 066711 DF201 = 067625 DF72 067541 DH154 066540 
DD13 031676 DF120 = 5 DF202 = 067625 DF73 = 067472 DH155 = 06654 
DD14 031720 DF121 = 067404 DF203 = 067625 DF74 = 776 DH156 = 065156 
DD15 031730 DF122 = 067421 DF204 = 067625 DF75 = 067517 DH157 = 065156 
DD16 031746 DF123 = 067445 DF205 = 5 DF76 = 067517 DH16 063714 
217 031776 DF124 067554 DF206 = 067625 DF77 = 0675 DH160 = 065156 
DD18 032020 DF125 = 067554 DF 207 = 067625 DH1 063304 DH161 = 065156 
DD19 032040 DF126 = 067550 DF 21 066776 DH10 = 063654 DH162 = 065156 
DD2 031450 DF127 = 067550 DF210 = 067625 DH100 = 065156 DH163 = 065156 
032050 DF 13 DF211 067711 DH101 = 063654 DH164 = 063774 
DD21 032056 DF 130 = 5 DF212 = 067711 DH102 = 46 DH165 = 063774 
DD22 032070 DF131 067605 DF213 = 067711 DH103 = 064504 DH166 = 065156 
DD23 032120 DF 132 = 067605 DF 22 067002 DH104 = 065156 DH167 = 065156 


aa 
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DH17 063774 DH6 == 063654 DT136 = 071660 DT26 070422 EDONE 006264 
DH170 = 065156 = 064546 DT137 = 071732 Die? 070476 EEDATO 034102 
DH171 = 065156 DH61 = 065156 DT14 = 070040 DT3 067764 EEDONE 034164 
DH172 = 065156 DH62 = 065156 DT140 = 071732 DT30 070540 EEERO 36 
DH173 = 065156 DH63 = 065156 DT141 = 071732 DT31 = 070422 EEER1 033712 
DH174 = 156 D 065266 01142 = 071732 DT32 = 070476 EFER2 033750 
DH175 = 065156 DH65 065217 DT143 = 071660 D133 070572 EEERS 0 
DH176 = 065156 DH66 = 065156 DT144 = 071660 D134 070650 EEERS 
DH177 = 065156 DH67 = 063654 DT145 = 071732 DT35 = 070650 EE 034112 
DH2 063374 7 == 063654 DT146 = 071732 D136 == 070650 EEP1 034124 
DH20 064064 DH70 = 063654 D1147 = 071660 DT37 = 070650 EEP2 034134 
DH200 = 065156 DH71 = 064504 DTS = 070040 DTS = 067764 EEP3 034144 
DH201 = 065156 DH72 = 064546 DT150 = 071660 DT40 = 070572 EEP4 034154 
2 = 065156 DH73 = 065156 DT151 = 071732 DT41 070722 EERRO 006202 

DH203 = 065156 DH74 = 063654 DT152 = 071660 DT42 070754 EERR1 006220 
DH204 = 065156 DH75 = 063654 DT153 = 071732 DT43 070754 EERR2 2 
DH205 = 063774 DH76 = 504 DT154 071752 DT44 071032 EE1 033414 

206 = 065156 DH77 = 064546 DI155 = 071752 DT45 071102 EE10 033634 C 
DH207 = 065156 DISPLA 001142 DT156 = 071660 51746 071156 EE11 033644 C 
DH21 = 063654 DISPRE 174 DT157 = D147 071244 EE12 033652 C 
DH210 = 065156 DPAT3 016432 DT16 070202 DTS EE13 033670 C 
DH211 DSWR = 177570 DT160 = 071660 DT50 = 070650 EE2 033444 C 
DH212 = 063654 DT1 067720 DT161 = 071660 D151 071276 EES 033466 C 
DH213 = 063654 DT10 = 0 DT162 = 071660 DT52 = 071244 EES 3506 C 
DH22 064152 DT100 = 071354 DT163 = 071660 DT53 071334 EES 033516 C 
DH23 064207 DT101 = 071432 DT164 = 067764 DT54 071354 EE6 033524 C 
DH24 06434 DT102 = 071432 DT165 = 067764 DTSS = 071244 EE7 033542 C 
DH25 0645 DT103 = 071432 DT166 = 071660 DT56 = 071334 EE8 033572 C 
DH26 064546 DT104 = 071354 DT167 = 071660 DTS57 = 071354 EE9 033614 C 
DH27 = 064546 DT105 = 071432 DT17_ = 067764 DT6 070040 EMTVEC= 30 C 
DH3 063467 21106 = 071500 DT170 = 071660 DT60 = 071334 C 
DH30 = DT107 = 071432 DT171 = 071660 D161 = 071354 EM10 = 04 C 
DH31 = 064546 DT11_ = 070040 DT172 = 071660 DT62 = 071354 EM100 052171 C 
DH32 = 064546 DT110 = 071354 DT173 = 071660 D163 = 071354 EM101 052231 D 
DH33 064634 DT111 §=071520 DT174 = 071660 DT64 071412 EM102 052355 
DH34 = 064634 DT112 = 071520 DT175 = 071660 D165 = 071412 EM103 052427 
DH35 = 064634 D1113 = 071520 DT176 = 071660 D166 = 071354 EM104 052532 ) 
DH36 = 064634 CT114 = 071520 DT177 = 071660 DT67 = 070244 EM105 052573 
DH37 = 064634 DT115 = 071520 DT2 067742 DT? = 070040 EM106 052720 D 
DH4 063560 DT116 = 071520 DT20 070222 D170 071432 EM107 052773 0 
DH40 = 064634 DT117 = 067764 DT200 = 071660 DT71 = 071432 EM11 1 D 
DH41 = DT12 070062 DT201 = 071660 DT72 071500 EM110 053077 D 
DH42 064737 DT120 = 067764 DT202 = 071660 DT73. = 971354 EM111 9053141 D 
DH43. = 064737 DT121 = 071244 DT203 = 071660 DT74 = 070244 EM112 = 053141 D 
DH44 = DT122 = 070650 DT204 = 071660 DT75 = 071432 EM113 9053243 D 
DH45 065041 DT123 = 071276 DT205 = 067764 DT76 = 071432 EM114 = 053243 D 
DH46 5 DT124 071532 DT206 = 071660 D177 = 071500 EM115 = 053141 D 
DH47 = 065041 DT125 = 071532 DT207 = 071660 D 005710 EM116 = 053243 D 
DHS 063654 DT126 = 071520 DT21 070244 D10 006112 EM117 053345 D 
DH50 065104 DT127 = 071520 DT210 = 071660 D 005734 EMi2 = D 
DH51 = 065104 D113 070150 DT211 071764 D3 005736 EM120 8053501 D 
DH52 = 063654 D1T130 DT212 072002 D4 00 EM121 36 D 
DH53 = 064546 DT131 071616 DT213 = 072002 DS 005754 EM122 053754 
DH54 065156 DT132 = 071616 DT22 070256 D6 005770 EM123 054053 
DH55 = 0636 DT133 =©071660 DT23 070304 D7 006000 EM124 054114 
DH56 = 064546 DT134 = 071660 DT24 070326 D8 006050 EM125 054207 


071660 070352 
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EM127 054506 EM210 063227 ERRVEC= 000004 FF2 034220 GPATO2 014120 D 
Em15 = EM211 = 043267 ERTYPE 037602 FF3 034242 GPATO3 014122 ) 
EM130 = 054721 EM212 = 043323 ERT1 037764 FFG 034250 GPAT10 014124 D 
—M131 055021 EM213 = 043355 ERT2 040202 FFS 034260 GPAT11 014126 
EM132 055061 EM22 044552 ERT3 FF6 034310 GPAT12 014130 D 
—EM133 = 055121 EM23 = 044552 ERTS 0216 FF? 034332 GPAT13 014132 D 
m1 055160 EM24 = 044552 ERTS 040230 FPSMS 040565 GRESET 0 D 
EM135 055217 EM25 044637 E1 006140 FPSPUR 040234 GSETUP 013572 D 
EM136 055256 EM26 044752 E2 006154 FPVECT= 000 GSUM 01 D 
—m137 = 055121 EM27 044752 E3 006154 FXDATO 010140 GS1 013622 D 
EM14 EM3 043162 4 006156 FXDAT1 010142 GTSWR = 104405 0 
EM140 = 055160 =M30 045020 FDATIO 010074 FXDAT2 010144 G1 011674 0 
EM141 = 055217 EM31 045072 FDATI1 01007 FXDATS 010146 G10 012172 D 
EM142 = 055256 EM32 = 045072 FDATi2 010100 FXDAT4 010150 G11 012174 D 
EM143 = 055315 EM33 045140 FDATI3. 010102 FXDATS 010152 Gi2 012262 D 
Em144 055350 EM34 045201 FDATI4 010104 FXDAT6 §= 010154 G13 612314 D 
EmM145 = 055315 EM35 04530 FDATIS 010106 FXDAT7 010156 G14 012316 D 
EM146 = 055350 EM36 045405 FDATI6. 010110 F 006270 G15 0124 D 
EM147 055403 EM37 045506 FDATI7 010112 F10 006502 G16 012436 D 
EM15 361 EMG 043227 FDATOO 010116 F1q 006504 G17 012440 D 
EM150 = 055403 EM4O 045607 FDATO1 010120 Fl2 006522 G2 011726 D 
EM151 = 055403 EM41 045760 FDATO2 010122 F13 006554 G20 012526 D 
EM152 §=055435 EM42 046015 FDATOS 010124 F135 006534 G21 012560 D 
EM153 = 055435 EM43 046136 FDATO4 010126 F14 006564 G22 012562 D 
EM154 055467 EM44 046257 FDATOS 010130 F15 006574 G23 012650 D 
EM155 = 055721 EM45 = 046257 FDATO6 010132 F16 006604 G24 012702 D 
EM156 056154 EM46 046322 FDATO7 010134 F17 006614 G25 012704 D 
EM157 056371 EM47 6400 FDONE 010160 Fe 006322 G26 012772 D 
EM16 043737 EMS 043267 FECMS 040631 F20 0066 G27 013024 D 
EM160 056610 EMSC 046516 FERRO F21 006634 G3 011730 D 
EM161 057015 EMS 046614 FERR1 006724 F22 006644 G30 013026 D 
EM162 838057222 EMS2 046655 FERR10 007504 F23 0 2 G31 013114 D 
EM163 057267 EMS3 046776 FERR11 007540 F3 006342 G32 013146 D 
EM164 057334 EMS4 047173 FERR2 007022 F4 006344 G33 013159 D 
EM165 057401 EMSS 047237 FERR20 007560 FS 006362 G34 013236 D 
EM166 057446 EMS6 047360 FERR21 007676 F6 006436 G35 013270 D 
EM167 057556 EMS7 047555 FERR2S 007726 F 006462 G36 013272 D 
EM17 044010 EM6 043323 FERR26 010044 GADR 014164 G37 013360 D 
—M170 5 EM60 047621 FERR3 007062 GANDO = 014134 G4 012016 D 
EM171 060125 EM61 050016 FERR4 007054 GAND1 014136 G40 013412 D 
EM172 EM62 5 FERRS 007160 GAND2 01414 G41 013414 D 
EM173 060623 EM63 050254 FERR6 007214 GANDS$ 014142 G42 013502 D 
EM174 EM64 050446 FERR7 007350 GCMP 013670 G43 013534 D 
EM175 = 061321 EM65 = 050446 FER2 00702 GDATOO 014154 G44 013536 D 
EM176 061560 E 050602 FFDATO 034462 GDATO1 014156 GS 012050 D 
EM177 8061715 EM67 050645 FFDONE 034542 GDATO2 014160 G6 012052 D 
E 043116 EM7 043355 FFERO 034352 GDATOS 014162 G7 012140 D 
EM20 044243 EM70 051076 FFER1 0343 GDONE 014166 HADR 014716 D 
M200 062052 EM71 051221 FFER2 034424 GERR1 013716 HAIR 014772 0 
EM201 062207 EM72 051323 FFPO 034472 GFLAG1 014110 HA1W 014722 ) 
EM202 062344 EM73 051377 FFP 034502 GFLAG2 014112 HA2R 015002 D 
EM203 062501 EM?’ 051437 FFP2 034512 GORO 014144 HA2W 014732 D 
06 EM75 051670 FFP3 034522 GOR1 014146 HA3R 015012 
EM205 062773 EM76 052013 FFP4 034532 GOR2 014150 HA3W 014742 
EM206 063040 EM77 052115 FFI 034170 GOR3 014152 HA4R 01502c 
EM207 063105 ERM10 035550 FF10 034340 GPATOO 014114 HASW 014752 
EM21 044421 ERROR = 104000 FFI 034350 GPATO1 014116 HASR 015032 
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SEQ 0174 
910360 KDONE 016434 MERR3 017216 Ma 017012 
010362 KERRO 016256 MNUMBE= 000213 MS 017046 
010376 KERR] 016322 MNUMO 042044 me 017052 
010440 KERR2 016346 MNUMT 042252 > 017062 
010442 KPATO 016424 MNUM2 042257 mg 017072 
010444 KPAT] 016426 MNUMS 0422 m9 017102 
010462 KPAT2 016430 MNUM4 — 042273 NDATIO 020004 
010206 K1 016150 5 042301 NDATI1 02 
010522 K10 016276 MPAT10 017256 NDATI2 020010 
610536 K2 016174 MPAT11 017260 NDATI3 020012 
010542 K3 016176 MPAT12 017262 NDATOO 017742 
010556 k4 016200 MPAT13 017264 NDATO1 017744 
010252 K5 016234 MPAT20 017266 NDATO2 017746 
010254 K6 016242 MPAT21 017270 NDATO3 017750 
010256 K7 016254 MPAT22 017272 NDONE 020014 
010302 LDATIO 016734 MPAT23 017274 NERRO 017504 
010316 LDATI1 016736 MS1 041610 NERR1 017604 
016102 LDATI2 016740 MS10 041764 NERR10 017536 
016104 LDATI3 016742 MS11 041777 NERR11 017550 
016106 LDATOO 016746 MS12 042024 NERR2 017640 
016110 LDATO1 016750 MS13 042062 NERR2O 017612 
016112 LDATO2 016752 MS14 042077 017650 
016114 LDATO3 016754 MS15 042165 NERR4 017660 
016116 LD 016756 MS16 © 042212 NERRS 017670 
016120 LD! 041276 MSi7 042217 NERR6 017714 
016122 LD? 041326 MS2 041622 1 064 
016132 LEKR1 016570 MS20 042307 NOOP10 041126 
016124 LERR2 016642 MS21 042350 NOOP11 041217 
016126 LERR3 016614 MS22 042407 NOOP15 040676 
016130 LF = 000012 MS23 042437 NOOP2 040774 
016134 LFIEX? 040453 MS24 042466 NOOP3 041011 
016136 LFIEX2 04 MS25 042561 NOOP4 04102 
016140 LFPS1 041263 MS26 042603 NOOPS 041040 
016142 n 004270 MS27 042620 NOOP6 041 
015762 LPAT10 016712 MS3 041627 7 0411 
016030 LPAT11 016714 MS30 042627 NPAT10 017774 
016054 LPAT12 016716 MS31 042636 NPAT11 017776 
015654 LPAT13 016720 MS32 042645 NPAT12 
016002 LPAT20 016722 MS33 042654 NPAT13 02000 
015700 LPAT21 016724 MS34 042663 NPAT20 017762 
015702 LPAT22 016726 MS35 042672 NPAT21 017764 
01 LPAT23 016730 MS36 042677 NPAT22 017766 
015740 LPERR = 104413 MS37 042706 NPAT23 017770 
015746 U1 6442 MS4 041656 NULL 040445 
015760 L2 016502 MS40 042724 NI 917312 
016404 L3 016504 MS41_ 042760 N10 017444 
016406 1h 016506 MS415 042740 N11 017454 
016410 LS 016556 MS42 043004 N12 017456 
016412 L6 016564 MS43 043022 N13. 017472 
016374 MDATOO 017276 MS44 043037 N14 017502 
016376 MDATO1 017300 MSS 041670 N2 017336 
016400 MDATO2 017302 MS6 = 041732 N3 017340 
016402 MDATO3 017304 MS? 041750 NG 017342 
016414 017306 me 016762 NS 017360 
016416 MERRO 017 M15 01002 Né 017370 
016420 MERR1 017170 M2 017006 N? 017400 
016422 MERR2 077104 M3 017010 N8 017416 

| 
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2» 
Ww 
rnin nnn nwo 


QERR21 


MACRO M1111 


020726 


021506 
021516 


26-SEP=79 


QERR22 


G 14 
09:38 PAGE 22-11 


021524 


lelelelelelele) 
ee eo os oS es 


003606 


nronnnrnitninh hhh bn nnn nh nnn 





041337 
177774 


lelelelelelelelelelelelele) 


SEQ 0175 





MOrrnr Mor VT0T00000000000000000000000000000”_0000000000900°9u"- 














H 14 
CKFPAAO FPTIF FLTG PNT PRT A MACRO M1111 26=SEP=79 09:38 PAGE 22-12 


SYMBOL TABLE SEQ 0176 


13 gr igie Uuls 022406 x1 023572 ZPATO1 025262 te 001422 
ang 

117 011302 u3 022042 13 024060 ZPAT11 025252 SDOAGN 034764 

T 011046 US 022106 X14 02406 ZPAT12 025254 34754 

T20 011342 US 022140 x15 024102 ZPAT13 025256 SENDCT 0 

Tel 011356 U6 022204 x16 024136 ZPAT20 025260 SENULL 035030 

T22 011360 U7 022236 x17 024162 ZPAT21 025262 SENV 

T2$ 011372 023556 K2 023626 ZPAT22 025264 001337 

13 011114 WDATO1 023560 x20 024170 ZPAT23 025266 SEOP 34542 

™ 011116 WDATO2 023562 X21 24204 ZTMP1 025224 SEOPCT 034570 

TS 011120 WDATO3 023564 x3 023652 ZTMP2 025226 SERFLG 001103 

T6 011144 023566 x4 023660 71 025012 RMAX 0011 

17 011160 WPATOO 023546 x5 023676 Z2 025034 SERROR 035314 
023012 WPATO1 023550 023732 73 


UPAT21 022750 XAPT11 024344 YPAT21 024760 $CM1 = 000024 $LF 001314 

UPAT22 022752 XDATOO 024322 YPAT22 024762 $cM2 = 000050 $SLFLG QO 

UPAT23 022754 XDATO1 024324 YPAT23 024764 $CM3 = 000024 $L 035022 
= 000024 $LPADR 001 


UPAT41 022770 XERR3 024234 ¥3 024462 $DDWO 001402 SMADR4 001364 
UPAT42 022772 XERRS 024304 ¥4 024500 $DDW1 001404 SMAIL. 001316 
UPAT43 022774 XPATOO 024332 Y5 024540 $DDW10 001426 SMAMS1 001346 
UROM1 023004 XPATO1 024334 Y6 024542 $DDW11 001430 SMAMS2 001352 
0 XPATO2 024336 Y7 024556 $DDW12 001432 $MAMS3 001356 

UROMS 023010 XPATO3 024340 ZDATOO 025230 $DDW13 001434 SMAMS4 001362 
TMP1 XPAT10 024342 ZDATO1 025232 $DDW14 001436 SMBADR 003574 
UTMP2 023002 XPAT12 024346 ZDATO2 025234 $DDW15 001440 SMFLG 0356670 
21714 XPAT13 024350 ZDATO3 025236 $DDW2 001406 SMNEW 037321 

U1 021744 XPAT20 024352 ONE 025270 $DDW3 001410 SMSGAD 001332 
U10 022302 XPAT21 024354 ZERR1 =025134 $DDW4 001412 SMSGLG 001334 
v1] 022304 XPAT22 024356 ZERR2 025176 SDDWS 001414 SMSGTY 001316 
Ul2 022336 X¥PAT23 024360 ZFLAG 025222 SDDW6 001416 SMSWR = 0.37310 
U15 022354 x TMP 024320 ZPATOO 025240 $DDW7? = 001420 $MTYP1 001347 


9) RAR chr TR Ae i 


C 
S 
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D 
) 
0 
D 
D 
D 
D 
D 
D 
D 
D 
D 
D 
0 
0 
0 
D 
D 
0 
D 
D 
D 
D 
0 
0 
D 
9) 
D 
C 
0 
C 
C 
C 
c 
C 
C 
C 
C 
C 
C 
C 
c 
C 
C 
C 
C 
C 
C 
C 
C 
C 





CKFPAAQ FPIIF FLTG PNT PRT A 
SYMBOL TABLE 


001353 


001202 SSAVRE 
- ABS. 072014 000 

000000 001 
ERRORS DETECTED: 0 


I 14 
MACRO M1111 26=SEP=79 09:38 PAGE 22-13 


035034 13 001260 
0 1262 


00 
oc 
00 
00 
00 
00 
00 
00 
00 
00 
00 
00 
00 
00 
00 
00 


KRNSSRRVESS-RNVSERK 


a a at at Ht 


$TRAP2 037354 
001256 


VIRTUAL MEMORY USED: 57440 WORDS ( ts PAGES) 


DYNAMIC MEMORY: 20434 WORDS 
ELAPSED TIME: 00:13:37 


( 78 PAGES) 


CKFPAAO, CKEPAAO/NL : TOC /CRF /=SP=CKFPAAO.MLB/ML, CKFPAAQ,P17 


003572 


SEQ 0177 
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C 
C 
C 
C 
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C 
C 
C 
C 
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C 
C 
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C 
C 
C 
C 
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C 
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C 
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C 
C 
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C 
C 
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C 
C 
C 
C 
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C 
C 
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CKFPAAO = CREATED BY MACRO ON 26=SEP=79 AT 09:43 PAGE 1 ( 
SYMBOL CROSS REFERENCE CREF SEQ 0178 < 
SYMBOL VALUE REFERENCES : < 
AADATO 026222 15<4571 15-4578 17-4600 1794607 1796612 1724638 1796665 17-6683 17-4689 C 
17-4697 -17=47038 = 17=4708 «= -17=46714 17-4718 | Cc 
02632 17-6653 17-4673) 17-4685) 17=4691 17-6699 1724705 17=4711" «= 4724717 #1 7=4750 t 
RRO 025654 15-4563 #174657 c 
AAFRR1 025742 17-4584  #17-4680 c 
AAERR2 025776 17-6586  #17-4686 F 
AAERR3 26032 17-4616  #17=4692 C 
AAERRG 26042 17-6618  #17-4694 ; 
AAERRS 026076 17=4620  #17=4700 C 
AAERR6 026132 17-4649 #174706 C 
AAERR? 026166 17-4651 17-4712 C 
AAER1O =: 025750 #17-4681 =: 17-4693 c 
AAPATO 026232 15-4564 17-4594 17=4628 «= 17-4681 17-4687 -17=4695 17-4701 = 1724707 =: 1744713 c 
# c 
AAPAT1 026242 15-4568 (17-6597 17-4682 »-17=4688 = -*117=4696 = -17=4702.-#17=4726 c 
AAPAT2 026252 15-4573 17-4605 = 17-4644 «= 17=4680 «=—s-:17=46686)—#17=4730 c 
AAPATS 026262 15-4577 17-4602 17-4692 17-4694 1726700 #17=4734 5 
AAPATG —- 026272 17-4611 -#17-4738 c 
AAPATS 26302 17-4632 17-4706 «= 17=4712-#17=4762 C 
AAPAT6 026312 17=4640 17-4709 1724715 #17=4746 c 
AAI 025274 #15-4560 c 
AA10 025410 #17-4591 c 
ANI 025440 17-4596 #17-4598 Cc 
AAI2 025442 #17-4600 c 
AA13 025460 #17-4606 =: 17-4621 Cc 
AA14 025500 #17-4609 17-4619 C 
AA15 025520 #17-4614 17-4617 C 
AAI6 025526 17-4615 #17=4617 ; 
AAI7 025532 17-4610  #17-4619 [ 
AA2 025332 15-4567 #15-456S ( 
AA20 625536 17-4605 9-17-4621 
AAI 025540 #17-4625 { 
AAZ2 025572 17-4631 #174633 t 
AA23 025574 #17-4635 i 
AAG 025614 #17-4642 17-4652 t 
AA25 025634 #17-4647 =: 17-4650 t 
AA26 025642 17-4648  #17-4650 t 
AA27 25646 17-4643 #174652 { 
AAS 025334 #15-4571 [ 
AAG 025352 #15-4575 =: 17-4587 t 
AAS 025372 #16-4581 17-4585 t 
AAG 025400 17-4583 #17-4585 i 
AA7 025406 15-4576 17-4587 { 
ABASE = 000000 8-1126 8-1126 i 
ACDW1 = 000000 8-1126 8-1126 i 
ACDW2 = 000000 8-1126 8-1126 i 
ACPUOP = 000000 8-1126 8-1126 | i 
ACO =%000000 #7-1115 —-*11-1686 = 11-1725 *12=2055.*12=2061 = 12-2066 = *12=2105.# 12-2112: 12-2125 i 
*12-2230 12-2239) *12=2273 = 12-2282.) *10-2519 = 12-2519 #12-2519 12-2519 #12=2519 t 
12-2519 #12-2520 = 12-2520 *12-2520 = 12-2520 *12-2520 12-2520 #122521 12-2521 i 
#122521 12-2521 #12-2522 12-2522 #12-2522 = 12-2522) *12=2523 12-2523 # 12-2523 [ 
#12-2526 = 12-2526 = #12=2526 = 12-2524 = #12=2525 20-2525 812-2525 1 2= 2505 


12-2523 





CKFPAAO 


SYMBOL CROSS REFERENCE 


SYMBOL 


CREATED BY MACRO ON 26-SEP-79 AT 09:43 


VALUE 


REFERENCES 
*12=2526 


#7-1116 
#7=1117 


9-1198 


*12=2526 


12-2529 


9-1229 


9=1204 


PAGE 2 
CREF 


12-2526 


*12-2530 


9-1237 


9-1216 


K 14 


12-2527 
9 


12-2530 


9-1250 


49-123) 


12-2527 
"Ie-Seca 


*13-2669 
*13-2670 
*13-2671 


9-1263 


22*+6694 


*12=2527 - 12=2527 
12-2529  #12=2530 
*13-2669 13-266 
13-2678 «13-2679 
#13-2693 13-2693 
#13-2774 13-2780 
*13-3030 13-3035 
#14-3333 14-3338 
#14=3742 14-3746 
#15-3956  *15-3982 
#15-4151 -#15-4154 
#15=4261  *15-4264 
#15-4391  #15-4393 
#17-4595 *17-4598 
#17=4796  *17=4798 
#17=4882 *17=4884 
*17-5088  *17-5090 
#17-5168 #175170 
#19-5340  #19-534 
#19-5412  #19-5414 
#19-5568  *19-5570 
*19-5693 «19-5695 
#12-2239 12-224 
*13-2667 *13-2677 
*13-2678 13-269 
#13-2679 13-2694 
*13-2680 12-2695 
*13-2681 13-2696 


*12=2528 


*12-2276 
13-2692 


SEQ 0179 
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SUB HHE 


CKF PAAO 


CREATED BY 
SYMBOL CROSS REFERENCE 
VALUE 
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CREATED BY 


CKF PAAO 





qqdddeeerh OF OUMarnvor —-UMaTmnor p= Poh way $A excooooc°n 
BEE ER aaa EE eR PERC EEE EE per sses= 
RRRRRRRBB RRRRRRRRRRRRSRAR SR aaoooe 


CKF PAAO 
SYMBOL CROSS REFERENCE 
SYMBOL VALUE 
BITOS = 
BITOS = 

IT = 000100 
BITO7 = 000200 
BITO8 = 00 
BITO9 = 001000 
BIT1 = 2 
BIT10 = 002000 
BIT11 = 000 
BIT12 = 010000 
BIT13 = 020000 
BIT14 = 040000 
BIT1S = 100000 
BIT2 = 000004 
BITS = 000010 
BITS = 000020 
BITS = 000040 
BIT6 = 000100 
BIT? = 000200 
BIT8 = 000400 
BIT9 = 001000 
BPTVEC = 000014 
B1 004666 
B2 004670 

004 706 

CCDATO 027750 
CCDONE 030110 
CCERO 027312 
CCER1 027346 
CCER10 27 
CCER11 027676 
CCER12 027714 
CCER13 027732 
CCER2 027404 
CCER22 027420 
CCERS 027442 
CCER4 027460 
CCER44 027474 
CCERS 027516 
CCERSO 27362 
CCERSS 027532 
CCER6 027552 
CCER7 27 
CCER8 027624 
CCER9O 027330 
CcPO 027760 
CCP 027770 
ccP10 630060 


CREATED BY MACRO ON 26-SEP-79 AT 09:43 


REFERENCES 


#7-1113 
#7-11 


RBRBBBRBBBBBReReeVeveVe 

NN WN SON SSS SSS SSS SV SUS SSS 

t(t1ettrrtnvrer eevee erveneeue 

and at and aad a and ad cal nd aed cs een en end eae end em 

eh at an en cd ee a nl end end end ed end en ed ee DD 
LNIWIWAWIWAWIO AMAA EN AON AAA AAA AA 
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1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 


17-4860 


eee 
— Se es 
ond anh and and ao band 


22222 Very rTy 


PPP EP 
WIAA AIAN 


17-4778 
17-4914 


17-4936 
17-4817 
#17-4941 


417-4983 
#17-4986 


17-4975 


11-1313 
17-4800 
17-4920 


17-4940 
17-4903 


17-4985 


#17-4937 
17-4795 
17-4980 
17-4953 
17-4978 


PAGE 5 
CREF 


19-5757 


17-4806 
17-4944 


17-4946 
17-4931 


17-4991 


17-4821 
#17-4999 
17-4956 
#17-5031 


N 14 


19-5757 


17-4829 
17-4950 


17-4952 
417-4953 


17-4881 
#17-5003 


4 


17-4835 
17-4959 


17-4961 


17-4909 


f 
y 


/ 


17-4858 
17-4965 


17-4967 


17-4943 


17-4864 
17-4971 


17-4973 


17-4949 


17-4886 
17-4979 


17-4982 


17-4958 


SEQ 0182 
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CKF PAAO CREATED BY MACRO ON 26-SEP-79 AT 09:43 PAGE 6 ¢ 
SYMBOL CROSS REFERENCE CREF SEQ 0183 S 
SYMBOL VALUE REFERENCES $ 
CCP11 030070 17-4888 17-4984 17-4987 #175035 E 
CCPi2 030100 #17-5039 E 
CCP2 030000 17-4769 17-4776 17-4941 17-4942 17-4947 17-4948 #17-5007 e 
CCP3 030010 17-4836 17-4850 17-4883 17-4893 17-4983 17-4986 #17-5011 e 
CCP4 030020 17-4911 17-4916 17-4921 17-4989 17-4990 17-4992 17-4993 #17-5015 E 
CCP5S 030030 17-4854 17-4865 17-4974 17-4977 = #17=5019 b 
CCP6 030040 17-4825 17-4831 17-4962 17-4963 17-4968 17-4969 = #17=5023 E 
CCP7 030050 17-4802 17-4954 17-4957 = =#17=5027 é 
CCI 026326 #17-4763 E 
cc10 026542 #17-4809 17-4812 E 
Cc11 026552 17-4810 #17-4812 E 
CCl2 026560 17-4805 #17-4814 E 
CC13 026572 17-4816 3917-4819 E 
CC14 2 17-4820 #17-4826 E 
cc15 026646 #17-4833 17-4843 E 
CC16 026666 #17-4838 17-4841 E 
CC17 026676 17-4839 = =#17-4841 E 
cci8 026704 17-4834 #17-4843 E 
cc19 026716 17-4845 #17-4848 E 
cc2 026356 17-4766 = #17-4770 E 
CC20 026746 17-4849 17-4855 E 
CC21 026772 #17-4862 17-4872 E 
CC22 027012 417-4867 17-4870 E 
CC23 027022 17-4868 #17-4870 E 
CC24 0270390 17-4863 #17-4872 E 
CC25 027042 17-4874 #17-4877 E 
CC26 027072 17-4880 #17-4884 E 
CC27 027114 #17-4890 17-4 E 
CC28 34 #17-4895 17-4898 E 
CC29 027144 17-4896 17-4898 E 
cc3 026400 417-4776 17-4786 E 
CC30 027152 17-4891 #17-4900 E 
cc31 64 17-4902 #17-4905 E 
CC32 027214 17-4908 #17-4912 E 
CC33 027236 #17-4918 17-4928 E 
CC34 027256 #17-4923 17-4926 E 
cc35 027266 17-4924 #17-4926 E 
CC36 027274 17-4919 = #17-4928 E 
CC37 027306 17-4930 #17-4932 E 
CC4 026420 #17-478)1 17-4784 E 
ccs 2 17-4782 = #17-4784 E 
CC6 0264 36 17-4777 = # 17-4786 E 
CC7 026450 17-4788 = #17-4791 E 
cc8 026500 17-4794 3917-4798 E 
cc9 026522 #17-4804 17-4814 E 
C 005662 11-1441 = #11-1507 E 
CERR1 005416 11-1341 11-1382 11-1398 11-1439 = 11-1444 E 
CERR2 005514 11-1354 11-1369 11-1411 11-1426 = 11-1466 E 
CERR? 005614 11-1458 11-1464 11-1482 11-1488 #11-1491 E 
CERRS 005636 11-1447 11-1471 =. #11-1498 E 
cFCC1 041400 #20-6040 E 
CKSWR = 104406 19-5755 19-5757 19-5757 #19-5769 20-5996 E 
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Se ee eee see eee ee meee ee eel el eel ee cl el ll el el me el eel el cl el el el cae ee el el el el el eel el el el el oe el el el ol nM 
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CREATED BY MACRO ON 26-SEP-79 AT 09:43 


SYMBOL CROSS REFERENCE 


SYMBOL 
CNT 
cPC 


CKFPAAO 
VALUE 
= 000214 
040304 


CPTWO 


D 15 
CKF PAAO CREATED BY MACRO ON 26-SEP-79 AT 09:43 cat 8 


SYMBOL CROSS REFERENCE SEQ 0185 

SYMBOL VALUE REFERENCES 

CR = 000015 #7-1113 19-5761 19-5761 

CRLF = 000200 #7-1111 #7-1113 9-1140 9-1140 19-5761 19-5761 20-6013 20-6013 20-6017 
20-6018 20-6019 20-6020 20-6022 20-6025 20-6027 20-6028 20-6030 20-6032 
20-6033 20-6048 20-6079 20-6080 20-6081 20-6082 20-6083 20-6084 20-6111 
20-6114 20-6117 20-6118 20-6122 20-6125 20-6132 20-6133 20-6138 20-6141 
20-6144 20-6146 20-614 0-6150 20-6152 20-6158 20-6159 20-6181 20-6181 
20-6181 20-6184 20-6184 1 20-6186 1 1 

20-6193 20-6193 20-6194 20-6197 20-6221 20-6221 20-6221 20-6222 
20-6224 26 20-6226 20-6227 20-6229 20-6231 20-6235 
20-6236 20-6254 20-6256 20-6260 20-6263 20-6265 20-6267 20-6268 
20-6270 20-6272 20-6273 20-6276 20-6276 20-6278 20-6280 20-6341 
20-6342 34 20-6342 20-6343 20-6343 20-634 20-6344 20-6344 

20-6344 0-634 20-6346 20-6346 20-6351 20-6352 20-6352 20-6353 
20-6354 20-6354 20-6355 20-6355 20-6356 20-6356 20-6357 20-6357 20-6358 
20-6358 2 20-6360 20-6361 20-6362 20-6363 -6364 20-6365 20-6369 
2 02 20-6406 20-6443 20-6466 20-6468 20-6468 20-6473 20-6473 20-6474 
2 90 20-6506 

C1 004772 #11-1328 

C15 005020 11-1333) = #11-1335 

C 005 #11-1344 

C25 005054 11-1347 89411-1348 

C3 005076 #11-1357 

C35 005126 11-1362 = 11-1363 

C 0051 #11-1372 

C45 005162 11-1374 =#11-1376 

C5 005204 #11-1385 

c55 005232 11-1390 3=#11-1392 

C 005252 #11-1401 

C65 005266 11-1403 = #11-1405 

C7 005310 #11-1414 

C75 534 11-1418 #11-1420 

c8 005362 #11-1429 

c85 005374 11-1431 = #11-1433 

DDDATO 033260 19-5315 19-5321 19-5344 19-5366 19-5388 19-5394 19-5416 19-5422 19-5444 
19-5450 19-5473 19-5479 19-5497 19-5498 19-5499 19-5500 19-5501 19-5502 
19-5503 19-5504 19-5505 19-5506 19-5507 19-5508  #19-5509 

DDDONE 033410 19-5492 19-5496 19-5497 19-5498 19-5499 19-5500 19-5501 19-5502 19-5503 
19-5504 19-5505 19-5506 19-5507 19-5508 #19-5553 

DDERO 032472 19-5333 19-5355 19-5377 19-5405 19-5433 19-5462 19-5491 -#19=5493 

DDER1 032510 19-5326 #19-5497 

DDER10 033126 19-5457 #19-5506 

DDER11 033164 19-5484 #19-5507 

DDER12 033222 19-5486 #19-5508 

DDER2 032546 19-5328 #19-5498 


DDERO 033070 


DDISP = 177570 g 8-1126 9-1139 





E 15 
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SYMBOL CROSS REFERENCE SEQ 0186 
SYMBOL VALUE REFERENCES 
DDONE 006124 11-1557 = -#11+1599 
DDPO 033270 19-5346 19-5368 19-5499 19-5500 #19-5513 
DDP 1 033300 19-5310 19-5312 19-5341 19-5361 19-5497 19-5497 19=5498 19-5498 19=5499 
19-5500 #195517 
DDP2 033310 19-5339 19-5363 19-5499 19-5500 #19-5521 
DDP3 033320 19-5383 19-5413 19-5501 19-5502 19-5503 19-5504 #19-5525 
DDP4 033330 19-5322 19-5439 19-5470 19=5505 19=55 19-5507 19-5508 #19-5529 
DDPS 03334 19-5441 19-5468 19=5505 19-5506 19-5507 19-5508 #19-5533 
DDP6 033350 19-5385 19-5411 19=5501 19-5502 19-5503 19-5504 #19-5537 
DDP7 033 19-5390 19-5418 19-5451 19-5480 19-5501 19-5502 19-5503 19-5504 #19-5541 
DDP8 033370 19-5395 19-5423 19-5446 19-5475 19-5505 19-5506 19-5507 19-5508 #19=5545 
0334 19-5317 19-5497 19-5498  #19-5549 
DD1 031420 #19-5306 
DD10 031620 #19-5348 19-5351 
DD11 031630 19-5349 #19-5351 
DD12 031646 19-5354 #19-5357 
DD13 031676 19-5360 #19-5364 
DD14 031720 #19-5370 19-537 
DD15 031730 19-5371 =#19-5373 
DD16 031746 19-5376 #19-5379 
DD17 031776 19-5382 #19-5386 
DD18 032020 #19-5392 19-5402 
DD19 032040 #19-5397 19-5400 
DD2 031450 19-5309 #19-5313 
DD20 032050 19-5398  #19-5400 
DD21 032056 19-5393 #19-5402 
DD22 032070 19-5404 #19-5407 
DD23 032120 19-5410 #19-5414 
DD24 032142 #19-5420 19-5430 
DD25 032162 #19-5425 19~5428 
DD26 032172 19-5426 = #19-5428 
DD27 032200 19-5421 #19-5430 
DD 031472 #19-5319 19-5329 
D0 032212 19-543 #19-5435 
DD31 032242 19-5438  #19-5442 
DD32 032264 419-5448 19-5458 
DD33 04 #19-5453 19-5456 
032314 19-5454 #19-5456 
DD35 032322 19-5449 #19-5458 
DD36 34 19-5461 #19-5464 
DD37 032370 19-5467 3 =#19-5471 
032412 #19-5477 19-5487 
DD39 032432 #19-5482 19-5485 
DD4 031512 #19-5324 19-5327 
DD40 032442 19-5483 19-5485 
DD41 032450 19-5478 #19-5487 
DD42 66 19-54 #19-5492 
DDS 031522 19-5325 #19-5327 
DD6 031530 19-5320 #19-5329 
DD7 031546 19-5332 #19-5335 
DD8 031576 19-5338 #19-5342 
DERR1 006004 11-1533 = -#11-1561 
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SEQ 9187 


SYMBOL CROSS REFERENCE 
SYMBOL VALUE 


REFERENCES 

DERR2 0061 11-1532 11-1589 

DF 1 066645 9-1132 #20-6547 

DF 10 = 066675 9-1132 #22-6556 

DFI00 8=6= 067472 9-1132 #22-6612 

DF101 = 067517 9-1132 #22-6613 

DF102 == 067541 9-1132 #22-6614 

DFI03 = 067517 9-1132 #22-6615 

DFI04 = 067472 9-1132 #22-6616 

DF105 = 067517 9-1132 #22-6617 

DF106 == 067541 9-1132 #22-6618 

DF107 = 067517 9-1132 #22-6619 

DF 11 = 75 9-1132 #22-6557 

DF110 == 067472 9-1132 #22-6620 

DF111 067550 9-1132 #22-6621 22-6622 22-6623 22-6624 22-6625 22-6626 22-6634 22-6635 

DF112 = 067550 9-1132 #22-6622 

DF113 == 067550 9-1132 #22-6623 

DF114 = 067550 9-1132 #22-6624 

DF115 = 067550 9-1132 #22-6625 

DF116 = 067550 9-1132 #22-6626 

OF117 == 5 9-1132 #22-6627 

DF12 066711 9-1132 #22-6558 

DFI120 = 5 9-1132 #22-6628 

DF121 = 067404 9-1132 #22-6629 

DF122 == 067421 9-1132 #22-6630 

DF123 == 067445 9-1132 #22-6631 : 

DF 124 067554 9-1132 #22-6632 22-6633 

DF125 = 067554 9-1132 #22-6633 

DF126 == 067550 9-1132 #22-6634 

DF127 == 067550 9-1132 #22-6635 

DF13 066743 9-1132 #22-6559 

DF 130 5 9-1132 #22-6636 

DF 131 067605 9-1132 #22-6637 22-6638 

DF132 == 067605 9-1132 #22-6638 

DF 133 067625 9-1132 22-6639 22-6640 22-664 1 22-6642 22-6647 22-664 22-6651 22-6652 
22-6654 22-6658 22-6659 22-6660 22-6662 22-6666 22-6667 22-6670 22-6671 
4 ten 22-6675 22-6676 22-6677 22-6678 22-6679 22-6680 22-6682 22-6683 

DF134 = 067625 9-1132 #22-6640 

DF135 + 067625 9-1132 22-6641 

DF136 == 067625 9-1132 422-6642 

DF 137 067651 9-1132 #22-6643 22-6644 22-6645 22-6646 22-6649 22-6650 22-6653 22-6655 

DF 14 = 9-1132 #22-6560 

DF140 = 067651 9-1132 22-6644 

DF141 == 067651 9-1132 #22-6645 

DF142 0 = 067651 9-1132 422-6646 

DF143 == 067625 9-1132 #22-6647 

DF144 == 067625 9-1132 #22-6648 

DF145 = 067651 9-1132 #22-6649 

DF146 == 067651 9-1132 #22-6650 

DF147 = =_ 067625 9-1132 #22-6651 

DF 15 = 066675 9-1132 #22-6561 

DFISO =— =_— 067625 9-1132 #22-6652 








SEQ 0188 | 
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SYMBOL CROSS REFERENCE CREF 

SYMBOL VALUE REFERENCES 

DF1S1 = 067651 99-1132 #22-6653 

DFIS2 = 067625 9-1132 #22-6654 

DF1S53 = 067651 99-1132 #22-6655 

DF 154 067661 99-1132 #22-6656 22-6657 

DF1SS = 067661 9-1132 #22-6657 

DF1S6 == 067625 9-1132 #22-6658 

DFIS7 == 067625 9-1132 #22-6659 

DF 16 9-1132 #22-6562 

DF 4 = 067625 9-1132 #22-6660 E 

DF 161 067665 9-1132 #22-6661 22-6663 22-6668 22-6669 22-6672 22-6673 
DF162 = 067625 9-1132 #22-6662 

DF163 = 067665 9-1132 #22-6663 

DF164 = 5 9-1132 #22-6664 

DF165 == 5 9-1132 #22-6665 

DF166 = 067625 9-1132 #22-6666 

DF157 == 067625 9-1132 #22-6667 

DF17 = 5 9-1132 #22-6563 

DF170 == 067665 9-1132 #22-6668 

DF171 = 067665 9-1132 #22-6669 

DF172 8 = 067625 9-1132 #22-6670 

DF173 == 067625 9-1132 #22-6671 

DF174 = 067665 9-1132 #22-6672 | 
DF175 = 067665 9-1132 #22-6673 

DF176 == 067625 9-1132 #22-6674 

DF177 == 067625 9-1132 #22-6675 

DF 2 066655 9-1132 #20-6548 

DF 20 766 9-1132 #22-6564 

DF200 = 067625 9-1132 #22-6676 

DF201 = 067625 9-1132 #22-6677 ’ 
DF202 = 067625 9-1132 #22-6678 

DF 203 = 067625 9-1132 #22-6679 

DF204 = 067625 9-1132 #22-6680 

DF205 = 5 9-1132 #22-6681 

DF206 = 067625 9-1132 #22-6682 

DF207 = 067625 9-1132 #22-6683 

DF 21 066776 9-1132 #22-6565 22-6603 22-6608 

DF210 = 067625 9-1132 #22-6684 
DF 211 067711 9-1132 #22-6685 22-6686 22-6687 

DF212 = 067711 9~1132 422-6686 

DF213 = 067711 9-1132 #22-6687 

DF 22 067002 9-1132 #22-6566 

DF 23 067014 9-1132 #22-6567 

DF 24 067024 9-1132 #22-6568 

DF 25 067033 9-1132 #22-6569 

DF26 - 067057 9-1132 #22-6570 22-6573 

DF 27 067104 9-1132 #22-6571 22-6574 ; 
DF3 066665 ht #20-6549 20-6550 22-6563 22-6627 22-6628 22-6636 22-6664 










DF 30 067124 9-1132 #22-6572 
#22-6573 
067104 9-1132 #22-6574 
#22-6575 


~] 
nn 
Ww 
2 
nou 
™~ 
So 
Ww 
N 
o 
i 
— 
a 
w 
as) 
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SYMBOL CROSS REFERENCE 
SYMBOL UE 
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< 
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a 
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REFERENCES 
9-1132 


a 
22-6620 


#20-6388 


#20-6461 
420-6462 
#20-6463 
#20-6389 


22-6577 


22-6583 


22-6590 


22-6631 


22-6594 
22-6595 


22-6560 


22-6601 


22-6605 
22-6611 


PAGE 12 
CREF 


22-6578 


22-6593 
22-6555 


22-6596 
22-6597 


22-6561 


22-6609 
22-6614 


H 15 


22-6579 


22-6629 
22-6556 


22-6598 


22-6610 
22-6618 


22-6557 


22-6599 


22-6613 


22-6602 - 


22-6615 


22-6607 


22-6617 


22-6612 


22-6619 


SEQ 0189 
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SYMBOL CROSS REFERENCE 
i UE 
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nuontun wt 
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REFERENCES 
9-1132 


#20-6495 
#20-6392 
#20-6498 
#20-6499 


#20-6506 
#20-6508 


#20-6517 
#20-6518 


#20-6521 


CREF 


20-6471 


20-6476 


20-6487 


20-6492 20-6493 20-6494 20-6501 20-6502 


20-6498 20-6499 20-6500 20-6503 20-6504 


20-6512 


SEQ 0190 


20-6509 


* 20-6508 20-6510 
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SYMBOL CROSS REFERENCE SEQ 0191 
SYMBOL 







VALUE REFERENCES 
DH167 == 065156 9-1132 20-6522 
DH17 063774 9-1132 #20-6396 20-6477 20-6483 20-6484 20-6519 20-6520 20-65 36 
DH170 «== - 06515 9-1132 #20-6523 
DH171 == 065156 9-1132 #20-6524 
DH172 = = - 065156 9-1132 #206525 
DH173 = = 065156 9-1132 #20-6526 
DH174 = 065156 9-1132 #20-6527 
DH175 = _: 065156 9-1132 #20-6528 
DH176 == 065156 9-1132 #20-6529 
DH177 = =_: 065156 9-1132 #20~6530 
DH2 063374 9-1132 #20-6379 
DH20 064 9-1132 #29-6398 
DH200 = 065156 9-1132 #20-6531 
DH201 = 065156 9-1132 #20-6532 
DH202 == 065156 9-1132 #20-6533 
DH203 = = 065156 9-1132 #20-6534 
DH204 == 065156 9-1132 #20-6535 
DH205 == 063774 9-1132 #20-6536 
DH206 == 065156 9-1132 #20-6537 
DH207 = 065156 9-1132 #20-6538 
DH21 = 063654 9-1132 #20-6400 
DH210 = 065156 9-1132 #20-6539 
DH211 00 9-1132 #20-6540 
DH2e12 == 063654 9-1132 #20-6541 
DH213 = 063654 9-1132 #20-6542 
DH22 064152 9-1132 #20-6401 
DH23 064207 9-1132 420-6402 
DH24 064 345 9-1132 #20-6495 ri 
DH25 064504 9-1132 #20-6407 20-6449 20-6454 20-6459 20-6463 20-6465 20-6470 
DH26 064546 9-1132 #20-6408 20-6410 20-6412 20-6415 20-64 33 20-64 36 20-64 38 20-6450 
20-6455 20-6458 20-6462 
DH27 064546 9-1132 420-6410 







DH3 063467 9-1132 #20-6381 22-6717 22-6747 

DH30 = 9-1132 420-6411 

DH31 = 064546 9-1132 #20-6412 

DH32 = 064546 9-1132 #20-6415 : 

DH33 064634 9-1132 #20-6414 20-6416 20-6417 20-6418 20-6419 20-6420 
DH34 = 064634 9-1132 420-6416 

DH35 = 064634 9-1132 #20-6417 

DH36 = 064634 9-1132 420-6418 

DH37 = 6 9-1132 #20-6419 








DH40 = =_ 064634 9-1132 #20-6420 

DH41 ~—- =: 000000 9-1132 #20-6421 

DH42 064737 9-1132 —-#20-6422 = 20-6424 d 
DH43 = = 064737 9-1132 20-6424 

DH44 = 000000 9-1132 — #20-6425 

DH45 065041 9-1132  —-#20-6426 =. 20-6428 






DH5 ~ 063654 9-1132 #20-6385 20-6 386 20-6387 20-6388 20-6389 20-6392 20-6393 20-6400 
20-64 32 20-6435 20-6447 20-6448 20-6452 20-6453 20-6457 20-6461 20-6480 





CKFPAAO 
SYMBOL ¢ 
SYMBOL 
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ROSS REFERENCE 
UE 


VAL. 


nnn nn nun 


REFERENCES 


20-6485 


9-1132 


#22-6807 


20-6542 
20-6431 


20-6539 


*9-1139 


9=1139 


2276804 


PAGE 15 
CREF 


20-6481 


20-6439 


20-6521 
20-65 30 


19-5755 


22-6805 


15 


20-6482 


20-6440 
20-6489 
20-0522 
20-6531 


» 19-5757 


22-6806 


20-6441 


e 3 
20-6532 


20-6446 
20-6513 
20-6524 
20-6533 


20-6451 
20-6514 
20-6525 
20-6534 


22-6807 22-6808 22-6818 22-6819 
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SYMBOL CROSS REFERENCE 
SYMBOL VALUE 


nue nn 


ee | | 


REFERENCES 
9-1132 


22-6817 


22-6823 


22-6827 
22-6846 
22-6857 
22-6866 


22-6831 


22-6844 


#22-6855 


PA 
Q 


CRE 


GE 16 
F 


22-6828 
22-6847 


22-6832 


L 15 


22-6829 
22-6848 
22-6859 
22-6869 


22-6833 


22-6834 


22-6870 


22-6836 


22-6835 22-6838 

22-6853 

22-6862 22-6863 
22-6871 


22-6837 


SEQ 0193 





CKF PAAO CREATED BY MACRO ON 26-SEP-79 AT 09:43 
SYMBOL CROSS REFERENCE 
SYMBOL VALUE 


nnn the 


none 


REFERENCES 
9-1132 We 


9-1132 
9-1132 


#22-6730 
#22-6695 


#22-6732 


#22-6769 


22-6784 


22-6874 


22-6735 
22-6736 
22-6697 


22-6746 
22-6743 


22-6753 


22-6768 


22-6813 
22-6774 


C 


4 
R 


PAGE 17 
F 


E 


22-6790 


22-6713 


22-6744 


22-6773 


22-6776 


mM 15 


22-6809 


22-6745 


22-6811 


22-6810 


22-6765 


22-6820 


22-6812 


22-6851 


22-6852 


SEQ 0194 





CKF PAAO 
SYMBOL or REFERENCE 
SYMBOL ALUE 
D154 vB 356 
DT55 = 071244 
DTS6 = 071334 
DTS7 = 071354 
DT6 0 0 
CT60 = 071334 
DTé61 = 071354 
DT62 = 071354 
D163 = 071354 
D164 071412 
DT65 = 071412 
DT66 = 071354 
D167 = 070244 
DT7 = 
DT70 071432 
DT71 = 071432 
DT72 971500 
D173 = 071354 
D174 = 070244 
DT75 = 071432 
DT76 = 071432 
D177 = 071500 
D1 005710 
D010 006112 
D2 005734 
D3 005736 
DS 005742 
DS 005754 
D6 005770 
D7 
08 006050 
D9 006062 
E 00626 
EEDATO 034102 
E 034164 
EEERO 033674 
EEER1 033712 
EEER2 033750 
EEER3 034 
EEERS 03404 
EEPO 034112 
EEP1 034124 
EEP2 0341 
EEPS 034144 
EEP4 034154 
EERRO 006202 
EERR1 006220 
EERR2 006234 
EE1 033414 
FE10 033634 
£E17 033644 


CREATED BY MACRO ON 26-SEP-79 AT 09:43 


REFERENCES 
9-1132 


22e 
tet 


(a4 ~~ ss as as — 9 © 2 ss —s — 9 —s —_—n. — 4» — 49 an 9 ss 9. - Ss Ss Ss -s 


zz 


aot ad cae end ened cen ed ed eh et 
‘ 
OAM MAM 


PPPPPPPP PP 
DNA = AWA AMAIA tt 
QAnMunon 
ety te pd NM 

MUWOO 


22 
1 ryvirr 


t 


40 


22-6775 
22-6701 
22-6782 


22-6787 
22-6796 
22-6793 


11-1559 
#11-1541 


11-1587 


11-1589 
11-1639 
19-5601 
19-5625 
#19-5621 


19-5625 
19-5625 


19-5627 


PAGE 18 
CREF 


22-6777 


22-6702 


22-6791 
22-6800 


11-1597 


19-5626 
19-5625 


19-5627 


N 15 


22-6778 


22-6703 


22-6792 


19-5625 
19-5627 


19-5627 
19-5626 


19-5628 


22-6779 


22-6710 


22-6795 


19=5626 
19-5628 


19-5628 
19-5626 


19-5628 


22-6783 


22-6711 


22-6797 


19-5627 
#19-5654 


#19-5633 
#19-5638 


#19-5646 


22-6789 


22-6799 


19-5628 


22-6796 


22-6801 


#19-5629 


SEQ 0195 


B 16 
CKF PAAO CREATED BY MACRO ON 26-SEP-79 AT 09:43 cna? 19 


SYMBOL CROSS REFERENCE SEQ 0196 
YMBOL VALUE 


S REFERENCES 
EE12 033652 19-5606  #19-5615 

EE13 033670 19-5618  #19-5620 

EE2 033444 19-5566  #19-5570 

EES 033466 "19-5576 =: 19-5586 

EES 33506 #19-5581 19-5584 

EES 033516 19-5582 #19-5584 

EEG 033524 19-5577 19-5586 

EE? 033542 19-5589 #19-5592 

FEB 033572 19-5595 #19-5599 

EES 033614 #19-5605 19-561 

EMTVEC = 000030 #7=11138 —-9=1139, 91139 
EM] 043061 9-1132 #20609 

EM10 =: 04326 9-1132 — #20-6105 

EM100 = 052171 9-1132 #206230 

EM101 052231 9-1132 #206231 

EM102 052355 91132 #20-6232 

EM103 052427 9-1132 #206233 

EM104 052532 9-1132 — #20-6234 

EM105 «052573 9-1132 — #20~6235 

EM106 =: 052720 9-1132 #2062 

EM107 «052773 9-1132 #206237 

EM11 3410 9-1132 #20-6106 

EM110 053077 9-1132 #20623 

M111 053141 9-1132 20-6254 20-6255 20-6258 
EM112 = 053141 9-1132 #20625 

EM113 (053243 1132 #20-6256 +=. 20-6257. 20-6259 
EM114 = 053243 9-1132  #20~625 

EM115 = 053141 9-1132  #20-6258 

EM116 = 053243 9-1132 — #20-6259 

EMi17 053345 9-1132 #206260 

emi2 = 9-1132  #20-6107 

EM120 053501 9-1132 #206261 

EM121 053635 9-1132 #206262 

EM122 053754 9-1132 #206264 

EM123 054053 9-1132 #20-6266 

EM124 054114 9-1132  #20-6267 

EM125 054207 9-1132 #20-6268 

EM126 = 054277 9-1132  #20-6269 

EM127 054506 9-1132  #20-6274 

emi3 = 9-1132  #20-6108 

EM130 = 054721 9-1132  #20-6279 

EM131 055021 9-1132 #206282 

EM132 55061 9-1132 0-62 

EM133. 055121 9-1132  #20-6324 20-6328 
EM134 055160 9-1132  #20-6325 20-6329 
EM135 = 055217 9-1132 #20-6326 = 20-6330 
EM136 =: 055256 9-1132  #20-6327 20-6331 
Em137 = 055121 9-1132 #20-6328 

EM14 043471 9-1132  #20-6109 

EM140 = 055160 9-1132 — #20-6329 

EM141 = 055217 9-1132  #20-6330 

EM142 = 055256 9-1132 — #20-6331 


CKF PAAO 

SYMBOL CROSS REFERENCE 
SYMBOL VALUE 
€m143 055315 
—EM144 055350 
Em145 = 055315 
EM146 = 055350 
—EM147 055403 
—M15 3614 
EM150 = 055403 
EM151 = 055403 
—m152 055435 
Em1iS% = 055435 
EM154 055467 
—mi55 055721 
—M156 056154 
—M157 056371 
—EM16 043737 
EM160 056610 
—M161 057015 
—M162 057222 
—M163 057267 
—£M164 057334 
—M165 057401 
EM166 057446 
—M167 057556 
—EM17 044010 
—M170 06001 
—M171 060125 
—M172 060364 
—M173 23 
—M174 061062 
—M175 061321 
EM176 061560 
—M177 061715 
EM2 043116 
EM20 044243 
EM200 062052 
EM201 062207 
EM202 062344 
EM203 062501 
EM204 636 
EM205 062773 
EM206 0 
EM207 063105 
EM21 044421 
EM210 063227 
EM211 = 043267 
EM212 = 043323 
EM213 = 043355 
EM22 044552 
EM23 = 044552 
EM24 = 044552 
EM25 044637 
EM26 044752 


CREATED BY MACRO ON 26-SEP-79 AT 09:43 


REFERENCES . 


9-1132 20-6332 
9-1132 #20-6333 
9-1132 #206334 
9-1132 #20-6335 
9-1132 #20-6336 
9-1132 #20-6112 
9-1132 20-6337 
9-1132 #20-6338 
9-1132 #20-6339 
9-1132 #20-6340 
9-1132 #20-6341 
9-1132 #20-6342 
9-1132 420-6343 
9-1132 20-6344 
9-1132 #20-6115 
9-1132 #20-6345 
9-1132 #20-6346 
9-1132 #20-6347 
9-1132 #20-6348 
9-1132 #20-6349 
9-1132 #20-6350 
9-1132 #20-6351 
9-1132 #20-6352 
9-1132 #20-6116 
9-1132 #20-6353 
9-1132 #20-6354 
9-1132 #20-6355 
9-1132 #20-6356 
9-1132 #20-6357 
9-1132 #20-6358 
9-1132 #20-6359 
9-1132 #20-6360 
9-1132 #20-6099 
9-1132 #20-6120 
9-1132 #20-6361 
9-1132 #20-6362 
9-1132 #20-6363 
9-1132 #20-6364 
9-1132 #20-6365 
9-1132 #20-6366 
9-1132 #20-6367 
9-1132 420-6368 
9-1132 20-6124 
9-1132 #20-637 

9-1132 #20-6371 
9-1132 420-6372 
9-1132 420-637 

9-1132 #20-6127 
9-1132 #20-61¢ 

9-1132 #20-6130 
9-1132 #20-6131 
9-1132 #20-6133 


20-6334 
20-6335 
20-6337 


20-6340 


20-6129 


20-6135 


PAGE 20 
CREF 


20-6338 


20-6130 


D 16 

CKFPAAQ CREATED BY MACRO ON 26=SEP=79 AT 09:43 = PAGE 21 

SYMBOL CROSS REFERENCE CREF SEO 0198 

SYMBOL VALUE REFERENCES 

EM27 = 044752 9-1132 #20-6135 

EM3 043162 9-1132  #20-6100 

EM30 045020 9-1132 —-#20-6136 

EM31 045072 9-1132  #20-6138 = 20-6140 

EM32. 0 = - 045072 9-1132 — #20-6140 

EM33 065140 9-1132 #206141 

FM34 045201 9-1132 —-#20-6143 

EM35 9-1132 — #20-6145 

FM36 045405 9-1132 —-#20=6147 

EM37 0455 9-1132 —-#20-6149 

EMG 043227 9-1132 #206101 

EMGO 045 9-1132  #20-6151 

EMA] 045760 9-1132 —-#20-6153 

EM42 046015 9-1132 #20-6158 

EMG 3 0461 36 9-1132 — #20~6159 

EMG, 046257 9-1132  #20-6160 =. 20-€ 161 

EM45 = 046057 93-1132 #20~6161 

EMG6 046322 9-1132  #20-6162 

EMG7 0464 9-1132 -#23-6167 

EMS 043267 9-1132 — #20-6102, 20-6195 =. 20-6371 

EMSO 046516 9-1132 #20-6168 

EMS 1 046614 9-1132  #20-6170 

EMS2 046655 9-1132  #20-6180 

EMS3 046776 9-1732 #206181 

EMS4 047173 9-1132  #20-6182 

EMS5 047237 9-1132 — #20-6183 

EMS6 047 9-1132 #20-6184 

EMS7 047555 9-1132  #20-6185 

EMG 043323 9-1132  #20-6103 = 20-6372 

EM6O 047621 9-1132 #20-6186 

EMO! 050016 9-1132 —-#20-6187 

EM62 05 9-1132 #20-6188 

EM63 050254 9-1132  #20-6192 

E 050446 9-1132  #20-6196 ~=— 20-698 

EM65 = = 050446 9-1132  #20-6198 

EM66 05 9-1132  #20-6199 

EM67 050645 9-1132 420-6221 

EM? 043355 9-1132 #20-6104 = 20-6373 

EM70 051076 9-1132  #20-6222 

EM71 051221 9-1132 — #20-6223 

EM72 051323 9-1132  — #20-6224 

EM73 051377 9~1132 0-6225 

EM74 051437 9-1132  #20-6226 

EM75 051670 9-1132 #20-6227 

EM76 052013 9-1132 — #20-6228 

EM77 052115 9-1132_  #20-6229 

ERM10 =» 035550 19-5757 19-5757 #195757 

ERROR = 104 #7-1113 91212, F-12386 91269 91262 91267, 11-1306 = 11-1312 11-1495 
11-1502. 11-1548 = 11-1572 «11-1586 = 11-1596 = 11-1632, -11-1638 = 11-1650 =: 11-1784 
11-1803 = 11-1807, 11-1817, 11-1839 = 11-1843 = 11-1851 =: 11-1866 = 11-1882. 11-1897 
11-1912 11-1920 11-1926 11-1945. 11-1955. 121964 = 12-1983: 12-1993 = 12=2001 
12-2161 12-2168 = 12-2176 = 12-2788) 12-2332, 12-2339 12-2346 = 12-2357 12-2590 


E 16 


PAGE 22 
CREF 


MACRO ON 26-SEP=79 AT 09:43 


REFERENCES 


CREATED BY 
SYMBOL CROSS REFERENCE 
VALUE 


SYMBOL 


CKFPAAO 


ERRVEC 


20-5912 #20-5916 


19-5883 


11-1792 #12=2004 


11-1783 


11-1797 11-1932 #12-2008 


11-1787 


#12-2013 


11-1848 


oro 


a 


#12-2017 


12-1969 


#11-1915 


11-1904 


CKF PAAO 
— 


FPVECT 


F XDATO 
FXDAT1 
FXDAT2 
F XDAT3 
FXDATS 
FXDATS 
FXDAT6 
FXDAT7 
Fl 


= 
oO 


NHRD WHA 
hon eS SS 
Ane 


cS 


CREATED BY 
CROSS REFERENCE 
VAL 


721 


~~ yy 
t 


675 


a eet et ot 
MUU a 


PPP PPT TT 


11-1675 
#12-2023 
#12-2024 
#12=-2025 


712 


= 


PPPP PPT TT 


PPrrrP 


22-6699 
11-1563 


9-1170 


17-5062 
11-1699 


#12=-2026 


R 


— et et od) oe) 3 3) 
me ed es os od 2 es) = =) 


25 


RRRRRBRAR 
nth ed walk end ca en end wad and end od 
> a te he Pe Pe | 
co 


u 


64 


MACRO ON 26=SEP=79 AT 09:43 
hs ae 


#19=5725 
#19=5729 
#19=5733 
#19=5737 

19-5715 


11-1643 
9-1186 


20-6000 
11-1738 


12-1974 


PAGE 23 
CREF 


19=5717 


13-2824 
11-1533 
11-1780 


F 16 


411-1846 


#19=5720 
#19=5746 


#19=574)1 


13-2843 
11-1611 
11-1781 


15-3995 
13-2766 
11-1850 


SEQ 0200 


15-4037 17-4661 #20-5943 
13-2799 14-3885 15-3978 
#12=2022 









CKF PAAQ CREATED BY MACRO ON 26=SEP=79 AT 09:43 


PAGE 24 
SYMBOL CROSS REFERENCE CREF 


SEQ 0201 













SYMBOL VALUE REFERENCES 
F21 0066 34 11-1765 411-1768 
F22 006644 11-1769 = #11=1772 
F23 006662 11-1775 411-1777 
F3 006342 11-1670 #11-1686 
F4 006344 #11-1687 11-1810 11-1936 
FS 006362 11-1691 =. #11=1694 
6 0064 36 11-1708 411-1711 
7 62 #11=1737 11-1718 
GADR 014164 12-2572 12=2591 12-2606 12-2610 #13=26463 
GANDO 0146134 12-2580 12-2606 #13=2628 
GAND1 014136 #13=2629 
GAND2 014140 #13-2630 
GAND 3 014142 #13-2631 ; 
GCMP 013670 12-2519 12-2520 12-2521 12-2522 12-2523 12-2524 12-2525 12-2526 12-2527 
12-2528 12-2529 12-253 #12=2562 
GDATOO 014154 12-2519 12-2520 12-2521 12-2522 12=2523 12-2524 12-2525 12-2526 12-2527 
12-2528 12=2529 12-2530 12-2549 12-2555 12-2562: 12-2589 #13-2638 
GDATO1 014156 413-2639 : 
GDATO2 014160 413-2640 
GDATO3 014162 #13-2641 
GDONE 014166 12-2532 13-2645 
GERR1 013716 12-2567 #12-2572 
GFLAG1 014110 12-251 12-2519 12-2520 12-2520 12-2521 12-2521 12=2522 122522 12-2523 
12-2523 12-2524 12-2524 12-2525 12-2525 12-2526 12-2526 12-2527 12-2527 
12-2528 12-2528 12-2529 12-2529 12-2530 12-2530 12-2535 #13-2615 
GF LAG2 014112 12-2587 12-2595 12-2603 13-2616 
S eeeene 7-1125 7-1125 9-1140 19-5752 19-5753 19-5769 19-5769 19-5769 19-5769 
19-5769 19-5769 19-5769 19-5769 19-5769 19-5769 19-5769 19=5769 19-5769 
19-5769 19-5769 19-5769 19-5769 19-5769 19-5770 19-5770 19-5771 19-5771 
GORO 014144 12-2574 12-2605 #13-2633 
GOR1 014146 #1 3-2654 
GOR2 014150 #13-2635 
GOR 3 014152 #13-2636 
GPATOO 014114 12-2519 12-2521 12-2523 12-2525 12-2527 12-2529 12-2545 #13=-2618 
GPATO1 014116 #13-2619 
GPATO2 014120 #13-2620 
GPATO3 014122 #13-2621 
GPAT10 014124 12-2520 12=2522 12-2524 12-2526 12-2528 12-2530 12-2540 #13=2623 
GPAT11 014126 #13-2624 . 
GPAT12 014130 #13-2625 
GPAT13 014132 #13-2626 
GRE SET 013650 12-2519 12-2520 12-2521 12-2522 12-2523 12-2524 12-2525 12-2526 12-2527 
12-2528 12-2529 12-2530 #12-2555 
GSE TUP 013572 12-2519 12-2520 12-2521 12-2522 12-2523 12-2524 12-2525 12-2526 12-2527 
12-2528 12-2529 12-2530 = #12 2535 
GSUM 014006 12-2519 12-2520 12-2521 12-2522 12-2523 12-2524 12-2525 12-2526 12-2527 
12-2528 12-2529 12-2530 #12-2595 
GS1 013622 #12-2545 12-2559 
GTSwWR 104405 -1140 #19-5769 
Gi 011674 12-2519 #12-251 12-2519 
G10 012172 12-2521 = #12=2521 
012176 12-2521 12-2521 


H 16 
CKFPAAO CREATED BY MACRO ON 26=SEP=79 AT 09:43 baat 25 :; 


SYMBOL CROSS REFERENCE SEQ 0202 
SYMBOL VALUE REFERENCES 
Gl2 012262 12-2522 #12=2522 12-2522 
G13 012314 12-2522 #12-2522 
G14 012316 12-2522 = #1. 2-25.22 
G15 0124604 12-2523 = #12=2523 12-2523 
G16 012436 12-2523 = #12=2523 
G17 012440 12-2523 = #12=2523 

011726 12-2519 #12=-2519 
620 012526 12-2526 12-2524 12-2524 
621 012560 12-2526 12-2524 
G22 012562 12-2526 #12=25246 
G23 012650 12-2525 #12=2525 12-2525 
G24 012702 12-2525 12-2525 
G25 012704 12-2525 #12-252 
G26 012772 12-2526 #12-2526 12-2526 
G27 013024 12-2526 #12-2526 
G3 011730 12-2519 #12=2519 
G30 013026 12-2526 #12-2526 
G31 013114 12-2527 312-2527 12-2527 
G32 013146 12-2527 #12=2527 
G33 013150 12-2527 = 12-2527 
G34 013236 12-2528 #12-2528 12=2528 
G35 013270 12-2528 #12-2528 
G36 0613272 12-2528 #12-2528 . 
G37 013360 12-2529 #122529 12-2529 
G4 012016 12-2520 #12-2520 12-2520 
G40 013412 12-2529 = #12-2529 
G41 013414 12-2529 = 12-2529 
G42 013502 12-2530 #12-2530 12-2530 
G43 013534 12-2530 #12-2530 
G44 36 12-2530 #12-2530 
GS 012050 12-2520 #12-2520 
G6 012052 12-2520 #12-2520 
G7 012140 12-2521 = #12=2521 12-2521 
HADR 014716 13-2700 13-2708 #13=2729 
HAIR 014772 13-2692 13-2702 13-2711 #13-2738 
HA1W 014722 13-2658 13-2667 13-2677 13=2701 13=2719 = #1 3=2732 
HA2R 015002 13-2693 #13-2739 
HA2W 014732 13-2668 13-2678 13-2733 
HA3R 015012 13-2694 #13-2740 
HA 3W 014742 13-2669 13-2679 #13-2734 
HASR 015022 13-2695 13-2741 
HAGW 014752 13-2670 13-2680 #13-2735 
HASR 015032 13-2696 #13-2742 
HASW 014762 13-2671 13-2681 #13-2736 
HCLR 014646 13- 13-2691 413-2711 
HCLR1 014656 #13-2713 13-2714 
HCOMP 014610 13-2675 13-2677 13-2678 13=2679 13-2680 13-2681 #13=2700 
HCMP 1 014630 #13-2704 13-2767 
HCMP2 014640 13-2705 #13-2707 

13-2659 413-2744 
bah ‘ 


CKFPAAO CREATED BY 
SYMBOL CROSS REFERENCE 
SYMBOL VALUE 
HDATS 015072 
HDATS 015102 
015112 
HERROR 014 
HF LAG 014720 
HSTD 014532 
HT = 11 
41 014174 
H10 014436 
H11 014470 
412 014522 
H2 014214 
43 014224 
HG 014276 
45 014320 
H6 014352 
H7 014404 
IDATIO 011012 
IDATI1 011014 
IDATI2 011016 
IDATI3 011020 
IDATOO 011002 
IDATO1 011004 
IDATO2 011006 
IDATO3 011010 
I DONE 011022 
IERRO 010562 
IERR1 010644 
IERR2 010664 
IERR2S 010706 
IERR3 010736 
IERRSG 010712 
ILLMS 041542 
ILL1 041436 
ILL2 041501 
IOTVEC = 020 
IPAT10 010762 
IPAT11 010764 
IPAT12 010766 
IPAT13 010770 
IPAT20 010772 
IPAT21 010774 
IPAT22 010776 
IPAT23 11000 
11 010166 
110 010350 
1105 010556 
1106 010352 
111 010360 
li2 010362 
113 010376 
114 010440 


#13=2657 
#1 3=2680 


#13-2673 
#13-2677 
#13-2678 
#13=+2679 

12-2065 
#12=2208 

12-2127 


12-2108 


13=2681 


13=2677 
13-2678 
13-2679 
12-2051 


#1 2-2209 
#12-2210 
12-2068 


9-1139 
12-2095 


#12-2194 


12-2195 
12-2104 


#1 2-2086 


MACRO ON 26=SEP=79 AT 09:43 
REFERENCES 


#7 3=2750 
13-2687 


12=2069 
12=2126 
12-2135 


12-2169 


#12-2165 


9-1139 
#12-2192 


#1 2=2197 


12-2185 


PAGE 26 


REF 


#1 3=27%) 
13-2679 


12-2096 


12-2129 
#12-2204 


12-2177 


I 16 


13-2680 


1222101 


1222167 


12-2189 


13-2681 


12-2130 


#12-2202 


#1 2=2212 


#13-2691 


12-2166 


#12=2207 


SEQ 0203 






CKF PAAO CREATED BY MACRO ON 26=SEP=79 AT 09:43 PAGE 27 
SYMBOL ge pater CREF SEQ 0204 
Vv 









#13-3097 


13-3072 


13-3062 





SYMBOL REFERENCES 
115 010442 #12-2113 12-2151 
116 0104644 #12=2114 12-2153 
117 010462 2=2118 #12=2121 
le 010204 #12=-2048 12-2049 
120 010522 #12-2132 12-2142 
121 0105 #1 2-2137 12-2139 
122 010542 12-2136 8 #12-2138 
123 010556 12-2133 = #12=2142 
13 010252 12-2059 12-2061 
14 010254 #12-206 12-2147 
15 010256 #12-2063 12-2149 
16 1030 #12-2071 12-2089 
17 010316 #12=-2076 12=2086 
JBUFO 016102 13=2938 #13-2987 
JBUF 1 016104 #13-2988 
JBUF 2 016106 #13-2989 
JBUF 3 016110 413-2990 
JDATIO 016112 13=2927 13-2942 13=+2950 13=2974 13=2982 #13=2992 
JDATI1 016114 #13-2993 
JDATI2 016116 #13-2994 
JDATI3 016120 #13-2995 
JDATOO 016122 13-2935 13-2963 13=2983 #13-2997 
JDATO 016132 12-2924 #13-%3002 
JDATO1 016124 #13-2998 
JDATO2 016126 #13-2999 
JDATO3 016130 #13-3000 
JDAT1 016134 #13-3003 
JDAT2 016136 #13-3004 
JDAT3 016140 #13-3005 

016142 13-2954 13-2969 13-2976 13=2985 #13=-3008 
JERRO 015762 13-2929 #13-2958 ’ 
JERR1 016030 13=2940 13=2952 #15=2971 
JERR2 016054 13-2947 #13-2980 ‘ 
J1 015654 413-2321 
J10 016002 13-2959 13-2961 #13=2964 
J2 015700 #13-2931 13-2972 13=+2987 
J3 015702 #13-2932 13-2958 
JS 015704 #13-2933 13-2960 
J5 015740 #13-2945 13-2948 
J6 015746 13-2946 #13-2948 
J7 0157 13-2951 #13-2954 

13-3037 13-3049 #13-3090 








13-3080 #15-3085 





13-3081 #13-3095 






K 16 
CKF PAAQ CREATED BY MACRO ON 26=SEP=79 AT 09:43 omer 28 


SYMBOL CROSS REFERENCE SEQ 0205 
YMBOL VALUE 


S AL REFERENCES 

KDATO3 016422 #15-3098 

K DONE 0164 34 13-3053 13=3067 13=3074 13-3087 #7 3=3105 

KERRO 016256 13-302 #13-3057 

KERR1 016322 13-3039 13-3051 #13=3069 

KERR2 016346 13-304 #13-3078 

KPATO 016424 13=3023 9 #13-3100 

KPAT1 016426 #13=-3101 

KPAT2 16430 #13=-3102 

K 016150 #13-3020 

K10 016276 13-3058 13-3 #7 3=3063 

K 016774 #13-3030 13-3070 13-3079 

«3 016176 #13-3031 13-3057 

KS 016200 #13-3032 13-3059 

KS 016234 #13=3044 13-3047 

k6 016242 13-3045 #13-3047 

kK? 016254 13-3050 #13-3053 

LDATIO 016734 13-3123 13-3130 13-3149 13-3169 13=3181 413-3196 

LDATI1 016736 413-3197 

LDATI2 016740 13-3143 13-3147 13-3163 913-3198 

LDATI3 016742 13-3148 #13-3199 

LDATOO 016746 13-3140 13-3150 13=3170 13=3175 413-3201 

LDATO1 016750 13-3182 #13-3202 

LDATO2 016752 #13-3203 

LDATO3 016754 #13-3204 

LDONE 016756 13-3158 13-3165 13=+3172 13=3184 #13=3206 

LD1 041276 #20-6035 

D 041326 #20-6036 

LERR1 016570 13-3145 #13-3160 

LERR2 016642 13-3155 #13-3174 

LERR3 016614 #13-3167 13-3178 

LF = 000012 47-1113 19-5761 19-5761 

LF IEX1 040453 #20-6017 22-6698 22-6700 

LFIEX2 040523 #20-6018 22-6698 22-6700 

LFPS1 041263 #20-6034 

LOOP 004270 #9-1142 19-5753 

LPAT10 016712 13-3120 13-3186 

LPAT11 016714 #13-3187 

LPAT12 016716 #13-3188 

LPAT13 016720 #13-3189 

LPAT20 016722 13-3124 13-3174 13-3191 

LPAT21 016724 #13-3192 

LPAT22 016726 #13-3193 

LPAT23 01673 #13-3194 

LPERR = 104413 9-1168 9-1278 11-1326 11-1343 11-1356 11-1371 11-1384 11-1400 11-1413 
11-1428 11-1530 11-1610 11-1669 11-1711 12-2041 12-2093 12-2221 12-2264 
12-2519 12-2520 12-2521 12-2522 12-2523 12-2524 12-2525 12-2526 12-2527 
12-2528 12-2529 12-2530 13-2655 13-2761 13-2793 13-2919 13-3018 13-3115 
14-3886 14-3907 15-3929 15-3947 15-3976 15-4091 15-4119 15-4147 15-4175 
15-4233 15-4256 15-4279 15-4302 15-4387 15-4482 15-4560 17-4591 17-4625 
17-4763 17-4791 17-4819 17-4848 17-4877 17-4905 17-5059 17-5083 17-5111 
17-5134 17-5163 17-5184 19-5 306 19-5335 19=5357 19-5379 19=5407 19-5435 
19-5464 19-5563 19=5592 19-5666 19-5688 #19-5771 





REFERENCES 
#13- 


N 


311 


at 
w 
( 
w 
— 
# 


#13- 


—O@ONOfWNW 


#20-6081 


13-3265 
#13-3267 
13-3257 


#14-3285 


#14-3296 


14-3281 


22-6725 


22-6759 


CREATED BY MACRO ON 26=SEP=79 AT 09:43 
SYMBOL CROSS REFERENCE 
SYMBOL VALUE 


13-3168 


13=3253 


14-3276 
#14-3278 


#20-6065 


#20-6069 
#20-6070 


#14-3301 


22-6738 


22-6763 
22-6764 


#20-6063 
22-6756 
22-6739 


22-6755 


22-6767 


22-6761 


PAGE 29 
CREF 


13+3180 


13-3263 


14-3285 


22-6755 
22-6731 
22-6816 
22-6752 


22-6755 


22-6757 


22-6738 


L 16 


14-3280 


14-3294 


22-6771 
22-6741 


22-6786 


22-6772 
22-6758 


22-6739 


SEQ 0206 


CKF PAAO CREATED BY MACRO ON 26-SEP-79 AT 09:43 caer 30 


SYMBOL CROSS REFERENCE SEQ 0207 
SYMBOL VALUE REFERENCES 
#20-6082 


22-6762 


22-6821 
22-6726 22-6738 22-6739 


22-6728 22-6741 22-6751 22-6785 22-6815 
$$-0ree Sw EH 22-6741 22-6742 22-6751 22-6752 22-6763 


13-3261 14-3274 14-3279 14-3291 
13-3267 14-3290 


#13-3247 
50 
14-3429 14-3439 414-3449 
14-3354 14-3361 14-3371 14-3428 #14-3433 


14-3398 14-3406 14-3412 14-3424 14-3431 9-14-3454 


14-3416 14-3418 
22-6708 
22-6708 


22-6705 
#20-6020 22-6705 22-6705 





SYMBOL CROSS REFERENCE 
ALUE 





2c 
414-3444 


14-3340 


14-3387 
14-3385 


414-3347 
414-3351 
14-3358 
#14-3361 
14-3573 


14-3504 
#14-3578 


#14-3570 








MACRO ON 26-SEP-79 AT 09:43 










14-3343 


#20-6014 


#14-3369 


14-3422 





14-3583 


14-3514 


14-3549 
#14-3551 


14-3560 


414-3583 
14-3491 

























CKFPAAO 


nonu 


CREATED BY MACRO ON 26-SEP-79 AT 09:43 
SYMBOL CROSS REFERENCE 
SYMBOL VAL 


021154 
021156 


REFERENCES 


14-3585 


#14-3477 
#14-3478 
#14-3479 


14-3626 


14-3677 
#14-3643 


#14-3682 
#14-3683 


#20-6013 
#14-3704 


9-1140 


PAGE 32 
CREF SEQ 0209 


14-3571 
14-3566 


14-3630 14-3651 14-3655 14-3659 14-3663 14-3667 14-3685 
14-3635 14-3692 14-3714 

14-3687 14-3694 14-3702 14-3719 

14-3658 14-3662 14-3666 414-3672 





CKF PAAO 
SYMBOL CROS 
MBOL VAL 


nnn the 


CREATED BY MACRO ON 26-SEP-79 AT 09:43 


S REFERENCE 
UE 


021222 


REFERENCES 
#7-1113 


OWWWNNAWNWAG 


#14-3742 


14-3833 


14-3749 


14-3809 
#14-3778 
#14-387' 


#14-3785 
#14-3789 


414-3838 


14-3755 


9-1139 


14-3682 
14-3778 


14-3843 


14-3760 


14-3819 


14-3792 


14-3767 


1423814 


PAGE 33 
CREF 


19=5774 
14-3690 


#14-3853 
14-3768 


14-3829 


14-3796 


14-3781 


14-3827 


19-5774 
14-3697 


14-3834 


14-3836 


#14-3804 


14-3832 


19=5774 19-5774 


#14-3848 


414-3858 


14-3789 14-3793 


19-5774 


14-3798 


19-5774 


14-3817 


SEQ 0210 





CKF PAAO CREATED BY MACRO ON 26-SEP-79 AT 09:43 PAGE 34 
SYMBOL CROSS REFERENCE CREF SEQ 0211 


SYMBOL VALUE REFERENCES 

Q3 = 021224 #14-3743 . 

04 021226 #14-374 

as 021250 #143751 14-3753 

06 021272 14-3752 #14-3760 

a7 021302 #14-3762 14-3764 

8 021314 14-3763 #14-3767 

a9 021330 #14-3770 14-3773 

RDCHR = 104407 #19-5769 

RESREG = 104411 #19-5769 

RESVEC = 000010 #7-1113 99-1139. 99-1139. -9=1139 

RSETUP = 104412 9-1269. 11-1315. 11-1507, 11-1599 11-1652, 12=2032,--12=2212 Ss «12=2380 = 13+ 2645 
13-2750 13-2910 = 13=3008_)~=— 13-3105. 13-3206) 14-3311 14-3454 14-3599 14-3719 
14-3858 15-4223 15-4373) 15-4469 15-4548 = 17-4750 17-5064 = 17-5207 ~—:17+5212 
19-5296 19-5654 -#19-5770 = 20-5950». 20-5961 20-5972 

RO =%000006 #7-1113 *9-1139 *9-1139 9-1139 

R7 =%000007 #7-1113 

SADR 015622 13-2826 13-2839 = 13-2844 = 13-2851 13-2857 #13-2898 

SAVREG = 104410 #19-5769 

SCOPE = #7-1113. 99-1166 99-1277, 11-1325. 11-1529 11-1609 11-1667 12-2040 = 12+2220 
12-2517 13-2654 «= 13-2760) 13-2918 = 13-3017, 13-3114. 13-3216 = 14-3320 14-3463 
14-3607 14-3728 = 14-3876 = 15-4090 15-4232 15-4382 15-4478 «= 15-4559 :17=4761 
17-5057 19-5304 19-5561 19-5664 —-19-5753 

SDATOO —- 015636 13-2779 13-2782, 12-2809 = 13-2812 -#13-2905 

SDATO1 015640 #13-2 

SDATO2 015642 #13-2907 

SDATO3 015644 #13-2908 

S 015646 13-2844 13-2863 13-2866 = 113-2870 = 13-2873. = 13-2885 = 13-2896 #13-2910 

SERRO «015326 13-2766 #13-2822 

SERR1 015536 13-2771 #13-2876 

SERR10 015346 #13-2828 13-2845 

SERR15 015426 13-2833 #13-2848 

SERR2 015466 13-2787 #13-2861 

SERR20 015446 13-2838 #13-2854 

SERR3. 015512 13-2790 #13-2868 

SERRG =»: 015404 13-2799 #13-2841 

SERRS 015570 13-2801 #13-2887 

SERR6 015500 13-2817  #13-2864 

SERR7 = 015524 13-2819 #13-2871 

SETD1 041414 11-1358 11-1456 #20-6042 

SETF1 041406 11-1329 11-1480 #20-6041 

SETI1 041422 11-1386 11-1486 #20-6043 

SETL1 041430 11-1415 11-1462 #20-6044 

SPACE 045 19-5851 19-5863 «19-5867 19-5871 «20-5910 #20-6016 

SPATIO 015626 13-2763 13-2783 = 13-2796 = 13-2813 = #13-2900 

SPAT11 015630 #13-2901 

SPATI2, 015632 #13-2902 

SPAT13 015634 #5 3-2903 

STACK = 001100 #7-1113 —-9-1139 20-6004 

START 003606 7-1125 #9-1139 19-5774 

STFS 041337 #20-6037 

STKLMT = 177774 #7-1113 

STST1 041467 420-6046 


Bgeet 
CKF PAAO CREATED BY MACRO ON 26-SEP-79 AT 09:43 cnee $5 


SYMBOL CROSS REFERENCE SEQ 0212 

SYMBOL VALUE REFERENCES 

$71 041352 #20-6038 

ST2 041367 #20-6039 

SwR 001140 #8-1126 9-1139 *9-1139 9-1139 *9-1139 *9=1139 9-1140 9-1218 9=1220 
12-2598 12-2600 19-5753 19-5755 19-5755 19-5755 19-5755 19=5755 19=5757 
19-5757 19-5757 19=5757 19-5757 19-5767 19=5 767 19-5774 19=5774 20-5993 

SWREG 000176 #7-1125 9-1139 9=1140 19=5767 19-5767 

SwO = 000001 #7-1113 

SwO0 = 000001 #7-1113 77-1113 

SwO1 = 000002 #7~-1113 7-1113 

SwO2 = 000004 #7~-1113 7-1113 

SwO3 = 000010 #7-1113 7-1113 

SwO04 = 000020 #7~-1113 77-1113 

Sw05S = 000040 #7-1113 7-1113 

SWwO6 = 000100 #7-1113 7-1113 

SWO7 = 000200 #7-1113 7-1113 

SwO08 = 000400 #7-1113 7-1113 

SwO9 = 001000 #7-1113 77-1113 

Sw = 000002 #7-1113 

SW10 = 002000 #7-1113 

Swi] = 004000 #7-1113 

SwW12 = 010000 #7-1113 

Sw13 = 020000 #7-1113 9-1218 12-2598 

SW14 = 040000 #7-1113 

Sw15 = 100000 #7-1113 

Swe = 000004 #7-1113 

Sw3 = 000010 #7-1113 

SWS = 000020 #7-1113 

SwW5 = 000040 #7-1113 

SwW6 = 000100 #7-1113 

SwW7 = 000200 #7-1113 9-1220 12-2600 

Sw8 = 000400 #7-1113 

Sw9 = 001000 #7-1113 

$1 015116 #13-2761 

$10 64 413-2807 

$11 015310 #13-2815 13-2818 

$12 015320 13-2816 #13-2818 

S2 015152 #13-2774 13-2861 13-2868 

$5 015154 #13-2775 13-2822 13-2876 

S4 015160 #13-2777 13-2878 

s5 015204 #13-2785 13-2788 

sé 015214 13-2786 #13-2788 

$7 015222 413-2793 13-2826 

$8 015256 #13-2804 13-2864 13-2871 13-2887 

s9 015260 #13-2805 13-2841 13-2889 

TAB = 000011 #7-1110 20-6015 20-6017 20-6018 20-6022 20-6029 20-6030 20-6031 20-6031 


20-6382 20-6382 20-6383 20-6383 20-6384 20-6384 20-6385 20-6385 20-6394 
20-6394 20-6395 20-6396 20-6396 20-6397 20-6397 20-6398 20-6398 20-6399 





CKFPAAO 
SYMBOL 
SYMBOL 


TBITVE 


CREATED BY MACRO ON 26-SEP=79 AT 09:43 


CROSS REFERENCE 
VALUE 


ee oe eo nd od os J 


— st = 


REFERENCES 
20-6399 


(4 
mn 
NW 
oon 
coo 


z 


SV SS eS PS SS OS SV HH BO OD St SS ST SS 


MNMNMNMINN I lenneeeeeaeew es 


(teem ' 
DOMIMPONPYNDS MMOMMONMPYNNNMOM NNN 


' 
N 
WM 
Ow 
On 


415-4 382 


9 
12-2229 


WIWNWAW 
Ww 


Hebe le Ape pet 


9-1139 


20-6403 


12-2247 


12-2295 


#12=2372 


12-2340 


#12-2336 


#12-2360 


#12=2365 


9-1139 


PAGE 36 
CREF 


20-6540 
12-2267 


12-2300 


12-2347 


20-6404 
20-6414 
20-64 34 
20-6475 
20-6497 


12-2272 


12-2338 


12-2358 


20-6407 
20-6415 
20-6434 
20-6478 
20-6497 


12-2301 


#12-2370 


#12-2380 


20-6407 
20-6422 
20-6444 
20-6478 
20-6507 


12-2337 


20-6407 
20-6422 
20-6444 
20-6479 
20-6507 


412-2375 


20-6408 


20-6423 


20-6445 
20-6479 
20-6511 


SEQ 0213 





CKF PAAO 


SYMBOL CROSS REFERENCE 


CREATED BY MACRO ON 26=SEP=79 AT 09:43 


SYMBOL VALUE 
TST3 00476 
TS*30 024770 
TST31 025272 
TST32 026324 
TST33 030112 
TST3¢ 031416 
TST35 033412 
TST36 034166 
TS137 034542 
TST4 005664 
TST 006126 
TST6 0062 
TST7 010162 
TYPE = 104401 
TYPOC = 104402 
TYPON = 104404 
TYPOS = 104403 
11 011026 
T10 011170 
7105 011176 
™11 011200 
T12 011202 
713 011216 
714 011260 
15 011262 
716 11264 
117 011502 
T2 011046 
T20 011342 
T21 011356 
T22 011360 
723 011372 
T3 011114 
14 011116 
T5 011120 
Té6 011144 
17 011160 
UDONE 023012 
UERRO 022456 
UERR1 022502 
UERR10 2251 
UERR11 022552 
UERR2 022566 
UERR20 022574 
UERR21 22636 
UERR3 022652 
UERRS 022702 
UF LAG 022776 


REFERENCES 
#11=1325 


2 
14-3877 


19-5753 


20-5908 
19-5753 


#12-2257 
#12-2260 


19-5753 
19-5767 
19-5822 
20-5926 
19-5797 


#19-5769 


12-2354 


15-4017 
#15-4003 


#15-4018 


15-3972 


PAGE 37 
CREF 


19=5753 
19-5767 
19-5850 
19-5840 


19-5880 


15-4032 


415-4074 


19-5757 
19-5767 
19-5862 


19-5849 


15-4043 


19-5757 
#19-5769 
19-5866 


19-5853 


15-4048 


19-5761 
19-5774 
19-5870 


19-5861 


#15-4080 


19=5763 
19=5785 
19-5889 


19-5865 


19=5767 
19-5813 
20-5898 


19-5869 


CKF PAAO CREATED BY 
SYMBOL CROSS REFERENCE 
SYMBOL VALUE 
UPATOO 022726 
UPATO1 022730 
UPATO2 022732 
UPATO3 022734 
UPAT10 022736 
UPAT11 022740 
UPAT12 022742 
UPAT13 022744 
UPAT20 022746 
UPAT21 022750 
UPAT22 022752 
UPAT23 022754 
UPAT 30 022756 
UPAT31 022760 
UPAT32 022762 
UPAT33 022764 
UPAT4O 022766 
UPAT41 022770 
UPAT42 022772 
UPAT43 022774 
UROM1 023 
OM2 23 
UROM3 023010 
UTMP1 023000 
UTMP2 23002 
021714 
U1 021744 
U10 022302 
U1} 022304 
U12 022336 
U13 022354 
U1G 022406 
U15 022436 
U16 022440 
U2 022010 
U3 022042 
UG 022106 
US 022140 
U6 022204 
U7 22236 
wDAPOO 023556 
WDATO1 023560 
WDATO2 023562 
WDATO3 23564 
023566 
wPATOO 023546 
WPATO1 023550 
wPATO2 023552 
wPATO3 023554 


REFERENCES 
1 7 


14-3889 


415-4054 


415-4059 


#15-4004 


15-4118 


15-4097 
15-4157 
15-4211 


MACRO ON 26=SEP=79 AT 09:43 


14-3911 


415-4069 


15-3934 
15-3935 
15-3936 
13 "aeae 
15-393 


15-4044 


15-4138 


15-4101 
15-4159 
15-4213 


PAGE 38 
CREF 


15=3932 


15-4146 


15-4103 
15-4178 


15=3950 


15-4920 


415-4076 


15-4166 


15-4122 
15-4183 


15-3968 = 15=3981 -#15=4049 

#15-4077 

#15-4078 

#15-4079 
15-4174 15-4196 15-4199: 15=4204 
15-4127 15-4131 15-4133: 15-4150 
15-4187 15-4189 15-4208 + =: 15-4209 


SEQ 0215 





CKF PAAO 


SYMBOL te FERENCE 


CREATED BY MACRO ON 26-SEP-79 AT 09:43 


REFERENCES 
15-4 


108 
1 


3 
#15-4248 


15-4164 
#15-4139 


#15-4128 
15-4139 


15-4267 


15-4263 


15-4269 


15-4260 
#15-4274 


15-4251 


15-4194 


15-4290 


15-4339 


15-4282 


15-4286 


15-4305 


15-4283 


PAGE 39 
CREF 


415-4208 


5-4313 


15~4347 


15-4292 


15-4309 


15-4315 


15-4306 


15-4331 


15-4352 


#15-4359 


15-4329 


#15-4368 


15-4330 


15-4336 


415-4373 


15-4334 


15-4335 


415-4354 


415-4364 


15-4337 


#15-4353 


CKF PAAO 

SYMBOL CROSS REFERENCE 
SYMBOL VALUE 

x6 02366 
x5 023676 
x6 023732 
x7 02375 
YDATOO 024726 
YDATO1 024730 
YDATO2 024732 
YDATO3 024734 
Y 024766 
YERR1 024566 
YERR2 024630 
YERR3 024672 
YFLAG 024716 
YPATOO 024736 
YPATO1 024740 
YPA102 024742 
YPATO3 024744 
YPAT10 024746 
YPAT11 024750 
YPAT12 024752 
YPAT13 024754 
YPAT20 024756 
YPAT21 024760 
YPAT22 024762 
YPAT23 024764 
YTMP1 024720 
YTMP2 024722 
YTMPS 024724 
Y1 024414 
Y2 024436 
y3 024462 
¥4 024500 
Y5 024540 
¥6 024542 
v7 024556 
ZDATOO 025230 
ZDATO1 025232 
ZDATO2 025234 
ZDATO3 25236 
Z 025270 
ZERR1 025134 
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ZFLAG 025222 
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ZPAT11 025252 
ZPAT12 025254 
ZPAT13 025256 
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REFERENCES 
15-4249 #1 


-42 5-4251 
19-4254 #15-4256 
19-4262 15-4264 

#15-4271 15=4274 
5-4396 15-4416 
#15-4450 
#15-4451 
#15-4452 
15-4413 15-4428 
15-4418 415-4421 
15-4420 15-4429 
19-4405 #15-4437 
15-4383 15-4406 
15-4384 15-4410 
#15-4455 
#15-4456 
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15-4401 = #15-4414 
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15-4491 15-4513 
#15-4529 
#15-4530 
#15-4531 
15-4508 15-451 
15-4497 #15-4509 
15-4501 #15-4517 
*15-4479 15-4502 
15-4480 #15-4533 
#15-4534 
#15~-4535 
#15-4536 
15-4505 #15-4538 
#15-4539 
#15-4540 
#15-4541 
15-4485 15-4512 
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SYMBOL CROSS REFERENCE 
SYMBOL VALUE 
$CPUOP 001344 
SCRLF 001313 
$DDWO 001402 
$DDw1 001404 
$DDW10 001426 
$DDW11 1430 
SODW12 001432 
SDDW13 001434 
SDDW14 001436 
$DDW15 001440 
$DDW2 1406 
$SDDWS 001410 
SODW4 001412 
$ODWS 001414 
SDDW6 001416 
SODW7 001420 
SODW8 001422 
SODW9 001424 
SDEVCT 001326 
SDE VM 001374 
$DOA 034764 
SENDAD 034754 
SENOCT 034576 
SENULL 035030 
SENV 1336 
SENVM 001337 
SEOP 034542 
SEOPCT 034570 
SERFLG 001103 
SERMAX 001115 
SERROR 035314 
SERRPC 001116 
SERRTB 001442 
SERTTL 001112 
SESCAP 001304 
SE TABL 1336 
SE TEND 001442 
SFATAL 001320 
SFFLG 036672 
SFILLC 001156 
SFILLS 001155 
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SYMBOL CROSS REFERENCE 


SYMBOL VALUE REFERENCES 7" 
SOMODE 24 *19=5763 = * 19-5763 19-5763 
SOVER 035276 19-5755 19-5755 19-5755 
SPASS 001324 a *9-1139 *19=5753 
SPASTM 00 #9-113 
AD 037556 #19-5774 
SPWRDN 037416 9-1139 #19-5774 19-5774 
SPWRMG 037552 #19-5774 
SPWRUP 037470 19-577 #19-5774 
SQUES 001312 #8-1126 19-5757 19-5757 
SRDCHR 037156 #19-5767 19-5769 19-5769 
SRDDEC = *eeeee 19-5769 
SRDOLIN = **eee® 19-5769 
SRDOCT = *eeeee 19-5769 
$SRDSZ = 1 #19-5767 19-5767 
SRE GAD 001160 #8-1126 
$REGO 001162 #8-1126 19-5757 19-5757 
SREG1 001164 #8-1126 
$REG10 001202 #8-1126 
SREG11 001204 #8-1126 
$REG12 001206 #8-1126 
SREG13 001210 #8-1126 
SREG14 001212 #8-1126 
$REG15 001214 #8-1126 
SREG16 001216 48-1126 
SREG17 001220 #8-1126 
1166 #8-1126 
$REG20 001222 #8-1126 
SREG21 001224 #8-1126 
$REG22 001226 #8-1126 
$REG23 001230 48-1126 
$SREG3 001170 #8-1126 
001172 #8-1126 
SREGS 001174 #8-1126 
SREG6 001176 #8-1126 
SREG7 001200 #8-1126 
SRE SRE 035610 #19-5759 19-5769 
SRTNAD 035024 #19-5753 
SRTRN 035020 9-1139 *9-1139 *9-1139 
$R2A = tek 19-5769 
SSAVRE 035552 #19-5759 19-5769 19-5769 
SSAVR6 037600 *19-5774 19-5774 = * 19-5774 
SSCOPE 035034 9-1139 #19-5755 
$SETUP = 000137 #7-1123 7-1123 47-1123 
7-1123 #7-1123 7-1123 
9-1139 9-113 9-11 


9 39 
9-1140 19-5753 19-5753 


$STUP) == 177777 #7-1123 #7-1123 7-1123 
#7-1123 #7-1123 7-1123 

$SVLAD 035242 19-5755 #19-5755 

$svPC = 003572 #9-1135 9-1135 
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SYMBOL VALUE 


CKFPAAQ 


Th MOMWUMTMMK —O 
MO BVeVesecmsS 
LN HKNOTAVUMARAR 
ONO HK NNMTTONNMNOO 
't that Andddeud 
NN KNNTOROOOCUC 
NN Sw r mR KR KK OU 
—-Tr Anuwsnowsusnovo 
MO STRAT M MORK NMN 
Rm @Oe NYMR UNRAR 
ONO KNNMTTOMNMNNOO 
im) thd pA addcun 
NN KNITTER ER uN 
NN Sem mr Rr Rm KK ON 
~O WRMOrOOMeOeorv 
NO MWONOMONOUAMNON, 
Rm Ge HTM AUMORKO 
OO HK NNMTTOANMNOODO 
‘4 FP RREP EU CrE: 
NN KONTO ROO CUCU 
NN Serr mmr KKK OUT 
WWW OW — CUCU MR CUR. OCUtU 
NMNVOR NO O- ONIN 
ROR OWT CUR. CUM ORK 
O00 — — NM TTMNNWN OOO 
(peeve pet depetd te 
NOUN — NUT ARR OOCUCUCU 
NNR eer rrr KK OO 
WMNONUCUT —OOR Ae OW OO 
MD CUCOMCUPICUAR OCUCKUIN — 
KRROR AMNWMNOOAWN ORK. CO 
O00 — — WITT TNO OO 
#rtrnreovet et tpvetdae 
NNR KNNNRR OOCUCUC 
NNN em mmm mr KCC 
TATAMOANA—OMAUNWY 
NTH MM — CUNOOR ONY To 
KR DWMNAMMNOOWWN OR. KR. 00 
OO00— —VNVTTTNNOOO 
BRREP PREPS OUEE 
NOUN — — OCR PL OO CCUG 
NNN mmm mr mR KON 
—XOR.HAOCOMMINO COM — 
Nag He mt Oe ORG ee F get Ge 
RRA MOAMMOOO ~The 
O00 — — NOM TTNMNOO 
@#tieevpevetd topes 
NNN KON TR KR OOOUCU 
NNN eC Orr rr KON 


ABA— THR TMOORTAMN 
—MO—ATUONAOOM 0 
RRR — OMMOMNO TWP IS 
WOOO CUCM ST TWO OOO 
REL GPP RESET EOP. 
NNN EK NNTONR OO CUCU 
NNN Re rm mR MK KN 
MOO wa BASES SaRrs 
HMR. OR. MOUAMNAAOOMO 
RRB QUOMN OT OATHORK 
eae whaeanbhehaas 
R dads "s cedhetun rete dheeucur 
NON EO NNTIONR OOCUCUN 
NNNOnr rrr rmr Kr Kenney 

a 

w 

wv 

N 

8 

¢ 

= 

eA 


Rronwesemoae 
MNOWMO-- ORMONY 
DMO WOM CUR AUMNOKR 
#rerprets dd 
KK NTT OAR RR ™N 
CeO CeCe eee eeK Tv 
MOOK O00 sO. OW 00 
ROAMMR OOM Or 
H——VMM TTT O 
BPARE RPE Ce. 
Se NUTTOHRE RR OOO 
| ed a oe oe oe oe el el el el ol 0) 
en ae abe 
SS. SOSSSkN om 
KRAMMNOOOOKCsTnr 
—— VOM T TT OO 
epeeeoeet t tpt 
HK NT TORR ROO 
Sel eel eel el eel eel Se el oe ee el | 
MOOR MM) OR. NOrk 
Or Kh TONDO AO 
RA—NOdOOws>nN 
= CUM MM TTY 
@#eepeepett tte 
ee TITRA ROO 
Sel al oe eel el eel ee oe el el od 
RMMR ——OwrMnr oO 
Ss Sa see rik 
FOr TF ODOAATN 
— — UMMM TAT 
#erpetett tte 
eK UTI RRR OO 
PPP FFF HOC]SC CSE SK 
—OoOnrCuxrDOOONM 
DWRA—NHNO-—TANO 
TOAST CONAN 
eH KH YMMM Tr nn 
Eragase. ‘dd 
ee NTT TNR ROO 
FFE FLEECE |CO]E SK 
MT MMs ORR TY 
CUe. | OF OZ RS 
WOO ~T OR. TAKUM 
TE HMMM TT TINNY 
 eperete tt tte 
ee OTT TNR RK AOAO 
tl sel sel el el el el ol el el ol 
wmOnrKR Ag ONT —MO 
WNDWOTAUS Owor 
woo. OR TR AON SO 
eH HK MMM TT TN 
prpetbetet ¢ tt ue 
HKUST T TNR RK OAOAOD 
PPS EEE CO] ST SK 


ryt tt. 22 
CoSSRORRS on 
MOA TWINS MOK AUN DO 
HOH KK MMMTT TON 
m"hhene_tetiusss s 
ie—UTITITORAR OO 
DEE FSCS KK 
= 
. ¢) 

w 
N 
8 


STMP6 


001250 


$S™MP7 


WRK OOR-O0Or AXXO 
NOK ——O ean OOOO 
mow XR To Pe 
iret eat iar in ei That 
AMM SAAR RAKRA 
Cc el el cee cl eel el oll ol a aoe ~ 
QCOorM on — RAO 
~mONO-ORDOO 0O000 
pase Pahcahaltd ata Le Se oe 
rial at iar iar Oey eee: 
= 
hen lae Sa HARD 
SOOO C CCE] S&S Cer eer 
RRBRBRVwVevwee & 
Aoosm one — AARC 
Sux Sameer 0000 
NR TOMmMnrnN Ss 
=O MYM st wr MNIAW 
(teteetevuetvoesp toe 
—NMM aT Tne oO AXAXAD 
Sel sel eel el ol sel el el Ce ae eel ee 
a 
Aoosrm OV - AXAXAXW 
k~-OWUO- OF. OOO 0000 
wR OCUR e- ST OMY i 
AN CUCM PIM) st oT val al al’ al 
m~-~tteetetete_eoutrtas ‘ioe 
1 UMM Trine o AAXRO 
errr rcren —— 
Aovrreowwow AXRRAO 
WONTON CUCUMN © oh oh oh 2) 
ONSOOOMRAUMNM (a a 
HK —NNMMM TT Val al al al 
m~665 60066638 ree 
§ ie CUMIM ST TINN OO AXXO 
cued seh eel sel eel se el peel cee 
QRaeeeeeeee 
ADOowrreooaownwr —_—— AXAXAO 
WNUTYH—UNUMMNO WOwoOwo OOOO 
ONOOOMRAUMM ARK aS ee 
H——NNMMMT TO min MINA 
—~-?tttetttittis tee . 2 2 om 
EK NVMIMT TNO AOD AAAD 
Qenrrnr rrr er eee eostnat 
RAovrroowasad=——— AXRAXAO 
NTO CUNMMNOrwsTowowo 0000 
NODOMP NUMNMARRAN™ RARER 
TP TTT Te SED 
= NMI) TTA AAA O ARAXAO 
SESE CO FF COC CoCo Co FC] CEES a 
) sete + 4 eg hte Wty te te ee 
MOMNAWUOOTOORARARRARRE 
Tar Tat wt wat tak ae ae te 
CUM MITA. AAA AAAAAAO 
ce sau, sel, seth sane Al ge age ee sel el el el eel el ea el a 
RBRRRBRBBRBRR 3 . 
wn et ppg 4 4 a AXAXAXO 
St RE BRWMO0DO000:00000 
ROMOMNAUWOOTOONCOMA RARE 
“ahh ow aowe db’ ore MK NNNNY 
mt ttt £0 town Fi 1 0 2 
NRK HK NUMMTONIE. 1 tt ts ARADO 
ARN ee mm mmr mr mee OOOO r rene 
22Rrn BR 
rt NM Onn? 
Lal WWIII 
eo MMO 
oe weal sel Dok 
8885 
oOo 
't i 
et 
Ln a 
2 Pakaae 
= eee ee 
A BABW WG 


CKFPAAO 
SYMBOL CROSS REFERENCE 
SYMBOL VALUE 
STRPAD 037366 
STSTM 003576 
STSTNM 001102 
STYPBN = *eeeee 
STYPDS = xeeeee 
STYPE 035646 
STYPEC 036C60 
$STYPEX 036176 
$TYPOC 036224 
$STYPON 036240 
STYPOS 036200 
SUNIT 001330 
SUNI TM 003602 
SUSWR 001342 
$VECT1 001 366 
$VECT2 001370 
SXTSTR 035046 
$$GET4 = 000001 
SOF ILL 036423 
S40CAT = xeewee 
-LPER 040322 
-RSET 040330 
SASTA = weeeke 
$x = 003572 


CREATED BY MACRO ON 26-SEP=79 AT 09:43 


REFERENCES 
19-5 


769 
#19-5769 
19-5771 
19-5769 
#9-1136 
#8-1126 
19-5757 


6 
#9-1136 


19-5769 
19-5770 
#19-5771 
#19-5769 


*19-5753 
19-5757 


5 
9-113 


19-5769 
19-5770 


19-5772 


19-5755 
19-5757 


19-5769 
19-5761 
#19-5761 
19=5769 
19=5 769 


19-5753 
19-5763 


PAGE 48 
CREF 


19-5769 
19=5770 


19=5755 
19-5787 


19-5769 
#19-5761 


#19-5763 


#19=5769 19=5769 19-5769 
19=5770 #19-5770 19=5771 

*19=5755 19-5755 19-5755 
19-5761 19=5767 


19-5769 
19-5771 


19-5755 


SEQ 0225 


19=5755 


2 ~ Ng ene) eo 
CREATED BY MACRO ON 26-SEP=79 AT 09:43 : 


CKFPAAO PAGE 49 

MACRO CROSS REFERENCE CREF SEQ 0226 

MACRO NAME REFERENCES : , 

ACCMAC #7-1016 -#12=2519 --#12=2520 --#12=2521 12-2522 12-2523) 12-2524 #122525. 12-2526 = # 12-2527 
#12=2528 = #12=2529 —-#12=2530 

AMAC1 #20-6154 20-6158 20-6159 . 

ASMAC1 #7-973 #19-5497 19-5498 = #19-5499-#19=5500 19-5501 419-5502 -#19=5503 19-5504 #195505 

: #19-5506 #19-5507 -#19=5508 = -#19=5625 19-5626 9-19-5627 19-5628 = #195715 #19-5717 

ASMAC #7- 

AS1 #20-6284 #206324 20-6325 20-6326 «= # 20-6327 20-6332 «= # 20-6333 = #206336 = 20-6339 

AS10 #20-63146 = #20-6352 = 20-6354 «= #20-6355 = #206356 = #20-6357 = # 20-6 358 

AS11 #20-6320 = 20-6359 = 20-6360 «=. 20-6361 «= - 20-6362 «= 20-6363 »=—s- 206364 = 20-6 365 

AS2 #20-6287 = #20-6341 #20634 

AS3 #20~6293 = 20-6343 = 20-634 

ASG #20-6299 #20-634© = # 20-6 34 

ASS #20-6304 20-6347 20-6348 20-6367 

AS6 #20-6307 = 20-6349 = - 20-6350 ~=—s_- 20-6 366 

AS? #20-6310 20-6351 20-6353 

COMMEN #7=1113 

ENDCOM #7-1113 

ENDPAS #7-863 19-5753 

ERMAC #7-895 19-5757 

ESCAPE #7-1113 

GETPRI #7-1113  —-#19-5753 

GETSWR #7-1113 = #9=1140 ss #9-1140 

HMAC 1 #7-986 #13-2667 -#13-2668 «= 13-2669 = 13-2670 = -#13-2671 

HMAC 2 #7-996 #13-2692 = #13-2693 = #13-26946 13-2695 = 13-2696 

HMAC 3 #7-1002 13-2677 13-2678 13-2679 13-2680 13-2681 

1 TEMAC #7-966 #9-1132 = #9=1132, #9=1132—#9=1132 =113 #9-1132 -#9-1132 #91132 #9~-1132 
#9-1132  #9-1132, #91132, #9=1132,#9-1132#9-1132#9-1132#9-1132#9-1132 0 #9-1132 
#9-1132#9-1132, 0 #9-1132#9-1132, #91132 #9-1132,#9-1132#9=1132#9-1132 9-112 
#9-112 #9-1132  -#9-1132,#9-1132#9-1132 #911382 #9-1132 ss w#9=1732#9-1132— #9-1132 
49-1132, #9-1132,- #91132 #9-1132,#9-11382 09-1132 #9-1132—#9-11382 #9-1132 #9-1132 
49-1132 #9=1132,#9-1132 99-1132, #911382 #9-1132#9-1132 #911382 #9-1132 #9-1132 
#9-1132  -#9=1132, #911382 #9-1132#9-1132-— #9-1132#9-1132— #9-11382#9-1132 ss #9-1132 
#9-1132#9-1132,#9-11382 99-1132 #9-11382—#9-1132#9-1132 #9113820 #9-1132 #91132 
#9-1132 = #9-1132#9-11382 99-1132 #91132 #9-1132#9-1132  #9-1132 #9-1132 #9-11382 
#9-1132,#9-11382 #91132 #9-1132, #911382 #9-1132 #91132 #9-1132#9-1132— #9-1132 
#9-1132 = #9-1132,#9-1132 #9-1132 #9-113 #9-1132 -#9-1132,#9-1132#9-1132 #9-1132 
#9-1132 0 #9-1132#9-1132,#9-1132#9-1132—#9-1132#9-1132- #9-1132 #9-1132 ss #9-1132 
#9-1132,#9-1132, #911382 #9~1132,#9-1132 09-1132 #9-1132 #911382 #9-1132 ss #9-1132 | 
#9-1132 #9-1132, #91132, #91132 9-1132, #91132 #9-1132 #91132 #9-1132 ss #9-1132 

LDM1 #20-6200 20-622 20-622 

LDM2 #20-6206 20-6222 #20-6227 #20-6231 #20-6235 

LDM3 #20-6210 20-622 20-6228 20-623 20-6237 

LDM4 #20-6214 20-6224 20-6229 20-6232 20-6236 

LDMS #20-6218 20-6225 20-6230 20-6234 20-6238 | 

LDM6 #20-6239  #20-6254 20-625 

LDM7 #20-6243 #206260 #20-6261 | 

LDM8 #20-6247 20-6267 20-6268 

LDM9 #20-6251 20-6282 20-628 

LD1M1 #20-6163 20-6167 20-6180 20-6183 

LD1M2 #20-6171 20-6181 = 20-6184 =. 20-6 186 | 

LDIM3 #20-6177 = #206182 20-6185 = #20-6187 = #20-6 199 

LOADTP 47-871 | 


CKFPAAQ 


MACRO CROSS REFERENCE 


MACRO NAME 


LPER 


RTMPM 
SETPRI 
SETTRA 


REFERENCES 
#7-1089 


#19-5769 


19-5759 
19-5759 


#9-1269 

#13-2910 
#15-4373 
#20-5961 


#19-5769 


CREATED BY MACRO ON 26-SEP=79 AT 09:43 


#9-1278 


#19=5435 
#9~1272 


#17-5046 


9-1277 
13-2918 
15-4232 


19-5765 
19-5765 


#11-1315 


#20-5972 


#19-5769 


#11-1326 


#17-5111 
#19-5464 


#9~1277 


19-5765 
19-5765 


#11-1507 
#13-3105 
#15-4548 


#19-5769 


PAGE 50 
CREF 


19-5774 
19-5765 


#11-1599 
#13-3206 
#17-4750 


#19-5769 


#19-5592 
#11-1325 


#19-5304 
11-1609 
13-3216 
15-4559 


19-5774 
19-5774 


#11-1652 
#14-3311 
#17-5044 


#19-5769 


#11-1371 


#19-5666 
#11-1510 


19-5774 


#122032 
14-3454 
#17-5207 


419-5769 


#11-1384 


#19-5688 
#11-1529 


#19-5561 


12-2040 
14-3463 
17-5057 


#11-1400 


#19-5335 


#11-1602 
413-2648 
#13-3208 
#14-3840 
#15-4551 
#19-5655 


12-2220 
14-3607 
19-5304 


#12-2380 
#14-3719 
#19-5296 


#19-5769 


SEQ 0227 
#11=1413 
#12=2519 


#12-2529 
#153929 
#15-4302 
417-4877 
#19=5357 


#11-1609 
#13-2654 
#13-3216 
#14-3876 
#15-4559 
#19-5664 


12-2517 
14-3728 
19-5561 


413-2645 
#14~-3858 
#19-5654 


#19-5769 


ee re 


SEQ 0228 
| 
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CKF PAAO 

MACRO CROSS REFERENCE 
MACRO NAME REFERENCES 
. SAPTY #7-1102 
-SCATC #7-1099 
-SCMTA #7-1099 
. SEOP #7-1100 
. SERRO #7-1100 
. #7-1101 
. SREAD #7-1102 
SSAVE #7-1100 
$SCOP #7-1100 
. STRAP #7-1101 
.STYPD #7-43101 
$TYPE #7-1100 
.STYPO #7-1100 


CREATED BY MACRO ON 26=SEP=79 AT 09:43 


#19-5769 


#19-5761 
#19-5763 


SEQ 0229 


